fix -noinnertypes set to true!

diff --git a/matita/matitaInit.ml b/matita/matitaInit.ml
index 3beb85ca61c10f3092e1be2195d004918c73a106..8ae9b00a37fb0e325058428be5ade6bb957abc66 100644 (file)
--- a/matita/matitaInit.ml
+++ b/matita/matitaInit.ml
@@ -246,7 +246,7 @@ let parse_cmdline init_status =
       Helm_registry.set_int "matita.verbosity"
         (Helm_registry.get_int "matita.verbosity" + 1) in
     let no_innertypes () =
-      Helm_registry.set_bool "matita.noinnertypes" false in
+      Helm_registry.set_bool "matita.noinnertypes" true in
     let arg_spec =
       let std_arg_spec = [
         "-I", Arg.String (add_l includes),