diff --git a/sw/logalizer/plotter.ml b/sw/logalizer/plotter.ml index cdbb1241ca..25e4b4754a 100644 --- a/sw/logalizer/plotter.ml +++ b/sw/logalizer/plotter.ml @@ -308,7 +308,7 @@ let base_and_index = (field_descr, 0) let rec plot_window = fun window -> - let plotter = GWindow.window ~allow_shrink:true ~title:window.title () in + let plotter = GWindow.window ~type_hint:`DIALOG ~allow_shrink:true ~title:window.title () in ignore (plotter#parse_geometry window.geometry); plotter#set_icon (Some (GdkPixbuf.from_file Env.icon_file)); let vbox = GPack.vbox ~packing:plotter#add () in