]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/matitaGtkMisc.mli
several dialog boxes no longer used removed
[helm.git] / matita / matita / matitaGtkMisc.mli
index adea6961d1ee44896e29c8176809ab80bcb904aa..627909cd456e4e1b5969a8171e60d262469b0fc5 100644 (file)
@@ -41,8 +41,6 @@ val toggle_callback:
 val toggle_win:
   ?check:GMenu.check_menu_item -> GWindow.window -> unit -> unit
 
-val add_key_binding: Gdk.keysym -> (unit -> 'a) -> GBin.event_box -> unit
-
 (** Connect a callback to the clicked signal of a button, ignoring its return
   * value *)
 val connect_button: #GButton.button -> (unit -> unit) -> unit
@@ -113,8 +111,6 @@ class taggedStringListModel:
 class type gui =
   object  (* minimal gui object requirements *)
     method newUriDialog:          unit -> MatitaGeneratedGui.uriChoiceDialog
-    method newConfirmationDialog: unit -> MatitaGeneratedGui.confirmationDialog
-    method newEmptyDialog:        unit -> MatitaGeneratedGui.emptyDialog
   end
 
   (** {3 Dialogs}
@@ -129,15 +125,6 @@ val ask_confirmation:
   unit ->
     [`YES | `NO | `CANCEL]
 
-  (** @param multiline (default: false) if true a TextView widget will be used
-  * for prompting the user otherwise a TextEntry widget will be
-  * @return the string given by the user *)
-val ask_text:
-  gui:#gui ->
-  ?title:string -> ?message:string ->
-  ?multiline:bool -> ?default:string -> unit ->
-    string
-
 val report_error:
   title:string -> message:string -> 
   ?parent:#GWindow.window_skel ->
@@ -152,3 +139,5 @@ val utf8_parsed_text: string -> Stdpp.location -> string * int
 val utf8_string_length: string -> int
 
 val escape_pango_markup: string -> string
+
+val matita_lang: GSourceView3.source_language