X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2FmatitaGui.ml;fp=helm%2Fsoftware%2Fmatita%2FmatitaGui.ml;h=3c7db84cdc8c0affd7c48eb72c7efda60fdd038e;hb=5c8de084e314e41f3dc2f605f6242283e930b803;hp=d701a50ae44441caed18e3acc5e0eb2280397db3;hpb=c353df2f92c619afcbfcdf978df146239ed2db1c;p=helm.git

diff --git a/helm/software/matita/matitaGui.ml b/helm/software/matita/matitaGui.ml
index d701a50ae..3c7db84cd 100644
--- a/helm/software/matita/matitaGui.ml
+++ b/helm/software/matita/matitaGui.ml
@@ -88,7 +88,9 @@ let save_moo grafite_status =
      GrafiteMarshal.save_moo moo_fname
        grafite_status.GrafiteTypes.moo_content_rev;
      LexiconMarshal.save_lexicon lexicon_fname
-       (GrafiteTypes.get_lexicon grafite_status).LexiconEngine.lexicon_content_rev
+       (GrafiteTypes.get_lexicon grafite_status).LexiconEngine.lexicon_content_rev;
+     NCicLibrary.serialize ~baseuri:(NUri.uri_of_string baseuri)
+      (GrafiteTypes.get_dump grafite_status)
   | _ -> clean_current_baseuri grafite_status 
 ;;