]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/matita.ml
Some more painful work.
[helm.git] / helm / software / matita / matita.ml
index f8cc4efb44f6806115cf95c4a278b69b1420e666..9fa70e11f8b56d65d778542b3e1c84cd06c91f4c 100644 (file)
@@ -280,8 +280,9 @@ let _ =
         ~doc:(HExtlib.unopt (mview ())#get_document) ~name:"matita.xml" ())); *)
     addDebugItem "load (sequent) MathML from matita.xml"
       (fun _ -> (mview ())#load_uri ~filename:"matita.xml");
-    addDebugItem "autoWin"
-    (fun _ -> MatitaAutoGui.auto_dialog Auto.get_auto_status);
+    addDebugSeparator ();
+    addDebugItem "Expand virtuals"
+    (fun _ -> (MatitaScript.current ())#expandAllVirtuals);
   end
   (** Debugging }}} *)