class typeConvenient message window[[> `DELETE_EVENT ]]
message_dialog =object
..end
val obj : [> Gtk.message_dialog ] Gtk.obj
method connect : ([> `DELETE_EVENT ] as 'a) dialog_signals
method set_markup : string -> unit
method message_type : Gtk.Tags.message_type
method set_message_type : Gtk.Tags.message_type -> unit