X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2FcicMathView.mli;h=521115548438e2e874e67a7f83d059cef885be92;hb=ccf5878f2a2ec7f952f140e162391708a740517b;hp=8f252a96795a10cc956d194bc7e707f6a38683b3;hpb=f3d0ba1e75bc3383d766f3a33a19352db19854df;p=helm.git

diff --git a/matita/matita/cicMathView.mli b/matita/matita/cicMathView.mli
index 8f252a967..521115548 100644
--- a/matita/matita/cicMathView.mli
+++ b/matita/matita/cicMathView.mli
@@ -63,5 +63,5 @@ val screenshot:
 
 (* CSC: these functions should completely disappear; bad design;
    the object type is MatitaScript.script *)
-val register_matita_script_current: (unit -> < advance: ?statement:string -> unit -> unit; grafite_status: GrafiteTypes.status; setGoal: int option -> unit >) -> unit
-val get_matita_script_current: unit -> < advance: ?statement:string -> unit -> unit; grafite_status: GrafiteTypes.status; setGoal: int option -> unit >
+val register_matita_script_current: (unit -> < advance: ?statement:string -> unit -> unit; status: GrafiteTypes.status >) -> unit
+val get_matita_script_current: unit -> < advance: ?statement:string -> unit -> unit; status: GrafiteTypes.status >