snapshot (first version in which some extensions work, e.g. infix +)

[helm.git] / helm / matita / matitaGtkMisc.mli

diff --git a/helm/matita/matitaGtkMisc.mli b/helm/matita/matitaGtkMisc.mli
index 46e5845964fa1284ad2edd11a89c03d415e7aea2..993dff4c37c0f74b82dace32a85b8c117b7d70c1 100644 (file)
--- a/helm/matita/matitaGtkMisc.mli
+++ b/helm/matita/matitaGtkMisc.mli
@@ -1,4 +1,4 @@
-(* Copyright (C) 2004, HELM Team.
+(* Copyright (C) 2004-2005, HELM Team.
  * 
  * This file is part of HELM, an Hypertextual, Electronic
  * Library of Mathematics, developed at the Computer Science
@@ -35,7 +35,18 @@ val toggle_win:
 
 val add_key_binding: Gdk.keysym -> (unit -> 'a) -> GBin.event_box -> unit
 
-val connect_button: GButton.button -> (unit -> unit) -> unit
+(** Connect a callback to the clicked signal of a button, ignoring its return
+  * value *)
+val connect_button: #GButton.button -> (unit -> unit) -> unit
+
+
+(** Connect a callback to the toggled signal of a button, ignoring its return
+  * value *)
+val connect_toggle_button: #GButton.toggle_button -> (unit -> unit) -> unit
+
+(** Like connect_button above, but connects a callback to the activate signal of
+  * a menu item *)
+val connect_menu_item: #GMenu.menu_item -> (unit -> unit) -> unit
 
   (** connect a unit -> unit callback to a particular key press event. Event can
   * be specified using its keysym and a list of modifiers which must be in
@@ -74,12 +85,6 @@ class type gui =
 
   (** {3 Dialogs} *)
 
-  (** @raise MatitaTypes.Cancel *)
-val interactive_user_uri_choice: gui:#gui -> MatitaTypes.choose_uris_callback
-
-  (** @raise MatitaTypes.Cancel *)
-val interactive_interp_choice: gui:#gui -> MatitaTypes.choose_interp_callback
-
   (** @return true if user hit "ok" button, false if user hit "cancel" button
   * @param cancel if set to true a cancel button is shown to the user, otherwise
   *   it is not (and indeed the function will return true). Defaults to true *)