]> matita.cs.unibo.it Git - helm.git/commitdiff
Stupid typo fixed.
authorClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Fri, 2 Sep 2005 09:42:34 +0000 (09:42 +0000)
committerClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Fri, 2 Sep 2005 09:42:34 +0000 (09:42 +0000)
helm/matita/matitacLib.ml

index 9165d5a8b7e6ec659a142993cc678ab8d8a2376a..3acfadfb66f6e0e434e83585bbe9302964ae555f 100644 (file)
@@ -139,7 +139,7 @@ let go () =
   MetadataTypes.ownerize_tables (Helm_registry.get "matita.owner");
   CicEnvironment.set_trust (* environment trust *)
     (let trust = Helm_registry.get_bool "matita.environment_trust" in
-     fun _ -> trust)
+     fun _ -> trust);
   status := Some (ref (Lazy.force MatitaEngine.initial_status));
   Sys.catch_break true;
   interactive_loop ()
@@ -159,7 +159,7 @@ let main ~mode =
   MatitaDb.create_owner_environment ();
   CicEnvironment.set_trust (* environment trust *)
     (let trust = Helm_registry.get_bool "matita.environment_trust" in
-     fun _ -> trust)
+     fun _ -> trust);
   status := Some (ref (Lazy.force MatitaEngine.initial_status));
   Sys.catch_break true;
   let origcb = MatitaLog.get_log_callback () in