Useless code removed; interfaces simplified; etc.

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

diff --git a/matita/matita/matitaGuiTypes.mli b/matita/matita/matitaGuiTypes.mli
index fa62970cef6c0835a74561ff0fcf23e59d02955e..c9f4f71ff21737d06511d8627ecc089a1bdc18f1 100644 (file)
--- a/matita/matita/matitaGuiTypes.mli
+++ b/matita/matita/matitaGuiTypes.mli
@@ -23,17 +23,6 @@
  * http://helm.cs.unibo.it/
  *)
 
-class type console =
-object
-  method message: string -> unit
-  method error: string -> unit
-  method warning: string -> unit
-  method debug: string -> unit
-  method clear: unit -> unit
-
-  method log_callback: HLog.log_callback
-end
-
 class type browserWin =
 object
   inherit MatitaGeneratedGui.browserWin
@@ -42,35 +31,16 @@ end
 
 class type gui =
 object
-  method setQuitCallback    : (unit -> unit) -> unit
-
     (** {2 Access to singleton instances of lower-level GTK widgets} *)
-
-  method fileSel :      MatitaGeneratedGui.fileSelectionWin
-  method main :         MatitaGeneratedGui.mainWin
-  method findRepl :     MatitaGeneratedGui.findReplWin
-
-  method console:       console
+  method main: MatitaGeneratedGui.mainWin
 
     (** {2 Dialogs instantiation}
      * methods below create a new window on each invocation. You should
      * remember to destroy windows after use *)
-
-  method newBrowserWin:         unit -> browserWin
-  method newUriDialog:          unit -> MatitaGeneratedGui.uriChoiceDialog
-  method newConfirmationDialog: unit -> MatitaGeneratedGui.confirmationDialog
-  method newEmptyDialog:        unit -> MatitaGeneratedGui.emptyDialog
+  method newBrowserWin: unit -> browserWin
 
     (** {2 Utility methods} *)
 
-    (** ask the used to choose a file with the file chooser
-    * @param ok_not_exists if set to true returns also non existent files
-    * (useful for save). Defaults to false *)
-  method chooseFile: ?ok_not_exists:bool -> unit -> string option
-
-    (** prompt the user for a (multiline) text entry *)
-  method askText: ?title:string -> ?msg:string -> unit -> string option
-
   method newScript: unit -> unit
   method loadScript: string -> unit
 end