]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/matita/matitaScript.ml
blocked undo of authomatic text (template)
[helm.git] / helm / matita / matitaScript.ml
index 821602dcecfd3d591d40b5baf95127b435b84746..5fa044e5330779cd68f58ce1aa1aa27ccde2f67d 100644 (file)
@@ -417,9 +417,7 @@ object (self)
        (fun _ -> if buffer#modified then 
           set_star self#ppFilename true 
         else 
-          set_star self#ppFilename false));
-    self#reset ();
-    self#template ()
+          set_star self#ppFilename false))
 
   val mutable statements = [];    (** executed statements *)
   val mutable history = [ init ];