sig
  val cast : 'Gobject.obj -> Gtk.about_dialog Gtk.obj
  module P :
    sig
      val comments : ([> `aboutdialog ], string) Gobject.property
      val copyright : ([> `aboutdialog ], string) Gobject.property
      val license : ([> `aboutdialog ], string) Gobject.property
      val logo : ([> `aboutdialog ], GdkPixbuf.pixbuf) Gobject.property
      val logo_icon_name : ([> `aboutdialog ], string) Gobject.property
      val name : ([> `aboutdialog ], string) Gobject.property
      val translator_credits : ([> `aboutdialog ], string) Gobject.property
      val version : ([> `aboutdialog ], string) Gobject.property
      val website : ([> `aboutdialog ], string) Gobject.property
      val website_label : ([> `aboutdialog ], string) Gobject.property
      val wrap_license : ([> `aboutdialog ], bool) Gobject.property
    end
  external set_artists : [> `aboutdialog ] Gtk.obj -> string list -> unit
    = "ml_gtk_about_dialog_set_artists"
  external get_artists : [> `aboutdialog ] Gtk.obj -> string list
    = "ml_gtk_about_dialog_get_artists"
  external set_authors : [> `aboutdialog ] Gtk.obj -> string list -> unit
    = "ml_gtk_about_dialog_set_authors"
  external get_authors : [> `aboutdialog ] Gtk.obj -> string list
    = "ml_gtk_about_dialog_get_authors"
  external set_documenters : [> `aboutdialog ] Gtk.obj -> string list -> unit
    = "ml_gtk_about_dialog_set_documenters"
  external get_documenters : [> `aboutdialog ] Gtk.obj -> string list
    = "ml_gtk_about_dialog_get_documenters"
  val make_params :
    cont:(([> `aboutdialog ] as 'a) Gobject.param list -> 'b) ->
    'Gobject.param list ->
    ?comments:string ->
    ?copyright:string ->
    ?license:string ->
    ?logo:GdkPixbuf.pixbuf ->
    ?logo_icon_name:string ->
    ?name:string ->
    ?translator_credits:string ->
    ?version:string ->
    ?website:string -> ?website_label:string -> ?wrap_license:bool -> 'b
  external create : unit -> Gtk.about_dialog Gtk.obj
    = "ml_gtk_about_dialog_new"
  external set_email_hook : (string -> unit) -> unit
    = "ml_gtk_about_dialog_set_email_hook"
  external set_url_hook : (string -> unit) -> unit
    = "ml_gtk_about_dialog_set_url_hook"
end