Matitaweb:

[helm.git] / matitaB / matita / matitaInit.ml

diff --git a/matitaB/matita/matitaInit.ml b/matitaB/matita/matitaInit.ml
index d4a47267faa8cbc2f79a488bbe33186957b6524e..7c5ab70a795848bb81796d664b5affeec95d5281 100644 (file)
--- a/matitaB/matita/matitaInit.ml
+++ b/matitaB/matita/matitaInit.ml
@@ -229,7 +229,7 @@ let parse_cmdline init_status =
               ("Do not catch top-level exception "
               ^ "(useful for backtrace inspection)");
            "-onepass",
-           Arg.Unit (fun () -> MultiPassDisambiguator.only_one_pass := true),
+           Arg.Unit (fun () -> () (* MultiPassDisambiguator.only_one_pass := true *)),
            "Enable only one disambiguation pass";    
           ]
         else []
@@ -274,7 +274,8 @@ let initialize_all () =
   status := 
     List.fold_left (fun s f -> f s) !status
     (conf_components @ other_components);
-  NCicLibrary.init ()
+   (* library for single user mode *)
+     NCicLibrary.init None
 
 let parse_cmdline_and_configuration_file () =
   status := List.fold_left (fun s f -> f s) !status conf_components