X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcic_annotations_cache%2FcicCache.ml;h=de5c1926e6f3d569169e3c08b2ee8ae3cd47641d;hb=dc9aab4ebfab88492cbaef935c79221f648d8313;hp=58a8f4197c8bb47d90374653e6ea4e810299daeb;hpb=08a2b1a3f1a1e9af07850089f0e0838eb052223d;p=helm.git

diff --git a/helm/ocaml/cic_annotations_cache/cicCache.ml b/helm/ocaml/cic_annotations_cache/cicCache.ml
index 58a8f4197..de5c1926e 100644
--- a/helm/ocaml/cic_annotations_cache/cicCache.ml
+++ b/helm/ocaml/cic_annotations_cache/cicCache.ml
@@ -45,7 +45,7 @@ let get_annobj uri =
     | Some bodyuri ->
        Some (G.getxml (U.cicuri_of_uri bodyuri))
   in
-   let annobj = CicParser.annobj_of_xml cicfilename cicbodyfilename uri in
+   let annobj = CicParser.annobj_of_xml cicfilename cicbodyfilename in
     annobj,
      if U.uri_is_annuri uri then
       begin