X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2FmatitaInit.ml;h=d4a47267faa8cbc2f79a488bbe33186957b6524e;hb=f4460413546165a7fabbf1e1da4cf2f5a44b26b9;hp=c40f81dff1b54b60bef14f234dab188d56b75431;hpb=bfcde2b08d72f1392ed61164c67d199360f0397f;p=helm.git diff --git a/matita/matita/matitaInit.ml b/matita/matita/matitaInit.ml index c40f81dff..d4a47267f 100644 --- a/matita/matita/matitaInit.ml +++ b/matita/matita/matitaInit.ml @@ -97,7 +97,6 @@ let initialize_db init_status = wants [ ConfigurationFile; CmdLine ] init_status; if not (already_configured [ Db ] init_status) then begin - LibraryDb.create_owner_environment (); Db::init_status end else @@ -168,8 +167,6 @@ let parse_cmdline init_status = wants [Registry] init_status; let includes = ref [] in let default_includes = [ - BuildTimeConf.stdlib_dir_devel; - BuildTimeConf.stdlib_dir_installed ; BuildTimeConf.new_stdlib_dir_devel; BuildTimeConf.new_stdlib_dir_installed ; ] @@ -284,7 +281,3 @@ let parse_cmdline_and_configuration_file () = let initialize_environment () = status := initialize_environment !status - -let _ = - CicFix.init () -;;