(* Automatically generated from cameleon/cameleon.glade by lablgladecc *)

class main ?(file="cameleon/cameleon.glade") ?domain ?autoconnect(*=true*) () =
  let xmldata = Glade.create ~file  ~root:"main" ?domain () in
  object (self)
    inherit Glade.xml ?autoconnect xmldata
    val toplevel =
      new GWindow.window (GtkWindow.Window.cast
        (Glade.get_widget_msg ~name:"main" ~info:"GtkWindow" xmldata))
    method toplevel = toplevel
    val main =
      new GWindow.window (GtkWindow.Window.cast
        (Glade.get_widget_msg ~name:"main" ~info:"GtkWindow" xmldata))
    method main = main
    val hbox1 =
      new GPack.box (GtkPack.Box.cast
        (Glade.get_widget_msg ~name:"hbox1" ~info:"GtkHBox" xmldata))
    method hbox1 = hbox1
    val menubar =
      new GMenu.menu_shell (GtkMenu.MenuBar.cast
        (Glade.get_widget_msg ~name:"menubar" ~info:"GtkMenuBar" xmldata))
    method menubar = menubar
    val statusbar =
      new GMisc.statusbar (GtkMisc.Statusbar.cast
        (Glade.get_widget_msg ~name:"statusbar" ~info:"GtkStatusbar" xmldata))
    method statusbar = statusbar
    val hbox_buttons =
      new GPack.box (GtkPack.Box.cast
        (Glade.get_widget_msg ~name:"hbox_buttons" ~info:"GtkHBox" xmldata))
    method hbox_buttons = hbox_buttons
    method reparent parent =
      hbox1#misc#reparent parent;
      toplevel#destroy ()
    method check_widgets () = ()
  end