X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Flexicon%2FlexiconSync.ml;h=9010dfcff01cbdefb4e74f1080a230cbcae0f89e;hb=ca41435a6021292ccba239aa173651c0be705b45;hp=30031943d9bb1897a5fa4a2a0dc473a715b7c796;hpb=fc4cf455977934bd737c3d6c8675ef7663a6a588;p=helm.git diff --git a/helm/software/components/lexicon/lexiconSync.ml b/helm/software/components/lexicon/lexiconSync.ml index 30031943d..9010dfcff 100644 --- a/helm/software/components/lexicon/lexiconSync.ml +++ b/helm/software/components/lexicon/lexiconSync.ml @@ -83,7 +83,7 @@ let add_aliases_for_object status uri = let add_aliases_for_objs = List.fold_left (fun status uri -> - let obj,_ = CicEnvironment.get_obj CicUniv.empty_ugraph uri in + let obj,_ = CicEnvironment.get_obj CicUniv.oblivion_ugraph uri in add_aliases_for_object status uri obj) module OrderedId =