diff --git a/sw/logalizer/plot.ml b/sw/logalizer/plot.ml index abee93f4d1..0973e1ac7d 100644 --- a/sw/logalizer/plot.ml +++ b/sw/logalizer/plot.ml @@ -270,13 +270,14 @@ class plot = fun ~width ~height ~packing () -> let () = context#set_font_by_name "sans 8 " in let layout = context#create_layout in let dr = self#get_pixmap () in - object + object (self) method size = let s = da#misc#allocation in (s.Gtk.width, s.Gtk.height) method init = fun () -> dr#set_foreground (`NAME "white"); + let (width, height) = self# size in dr#rectangle ~x:0 ~y:0 ~width ~height ~filled:true () method set_color = fun (r, g, b) ->