]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/matitaInit.ml
- cic_exportation, cic_acic, acic_content (only parts related to acic)
[helm.git] / matita / matita / matitaInit.ml
index 43e76cda10ae5ddd52fc39e31d567ad408a662a0..c40f81dff1b54b60bef14f234dab188d56b75431 100644 (file)
@@ -97,8 +97,6 @@ let initialize_db init_status =
   wants [ ConfigurationFile; CmdLine ] init_status;
   if not (already_configured [ Db ] init_status) then
     begin
-      if not (Helm_registry.get_bool "matita.system") then
-        MetadataTypes.ownerize_tables (Helm_registry.get "matita.owner");
       LibraryDb.create_owner_environment ();
       Db::init_status
     end
@@ -112,11 +110,6 @@ let initialize_environment init_status =
       Http_getter.init ();
       if Helm_registry.get_bool "matita.system" then
         Http_getter_storage.activate_system_mode ();
-      CicEnvironment.set_trust (* environment trust *)
-        (let trust =
-          Helm_registry.get_opt_default Helm_registry.get_bool
-            ~default:true "matita.environment_trust" in
-         fun _ -> trust);
       Getter::Environment::init_status
     end
   else
@@ -293,7 +286,5 @@ let initialize_environment () =
   status := initialize_environment !status
 
 let _ =
-  CicFix.init ();
-  CicRecord.init ();
-  CicElim.init ()
+  CicFix.init ()
 ;;