external set_url_hook   : (string -> unit) -> unit = "ml_gtk_about_dialog_set_url_hook"