X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=inline;f=helm%2Fmatita%2Fmatita.ml;h=93441ed83fc5627e64927a7d33e7c26a54b34905;hb=e7916b85dd9dab26b628ace838c683beb31db9c1;hp=40592d001eadd88b638242d60fd916bb8bcfa4f0;hpb=dfad83fbd13bfec107d1f7a9533c90b7bb862dcf;p=helm.git

diff --git a/helm/matita/matita.ml b/helm/matita/matita.ml
index 40592d001..93441ed83 100644
--- a/helm/matita/matita.ml
+++ b/helm/matita/matita.ml
@@ -35,8 +35,8 @@ let _ =
   Helm_registry.load_from "matita.conf.xml";  (* read conf *)
   Http_getter.init ();
   MetadataTypes.ownerize_tables (Helm_registry.get "matita.owner");
-  MatitaDb.clean_owner_environment ();
-  MatitaDb.create_owner_environment ();
+(*  MatitaDb.clean_owner_environment ();
+  MatitaDb.create_owner_environment (); *)
   GtkMain.Rc.add_default_file BuildTimeConf.gtkrc_file; (* loads gtk rc *)
   ignore (GMain.Main.init ());
 
@@ -86,6 +86,7 @@ let script =
         ~copy_cb:(fun s -> gui#sourceView#buffer#insert ("\n"^s^"\n"))
         () ~id:"boh?" uris
       with MatitaTypes.Cancel -> [])
+    ~set_star:gui#setStar
     ()
 
   (* math viewers *)