]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/components/lexicon/lexiconMarshal.ml
urimanager removed
[helm.git] / matita / components / lexicon / lexiconMarshal.ml
index 6693de21492b394a0817b3fcb41161fd909677d8..5e74e88156c307f16daee7d3e7a0151af335f8f8 100644 (file)
@@ -37,14 +37,10 @@ let load_lexicon_from_file ~fname =
   (raw: lexicon)
 
 let rehash_cmd_uris =
-  let rehash_uri uri =
-    UriManager.uri_of_string (UriManager.string_of_uri uri) in
   function
   | LexiconAst.Interpretation (loc, dsc, args, cic_appl_pattern) ->
       let rec aux =
         function
-        | NotationPt.UriPattern uri ->
-            NotationPt.UriPattern (rehash_uri uri)
         | NotationPt.NRefPattern (NReference.Ref (uri,spec)) ->
            let uri = NCicLibrary.refresh_uri uri in
             NotationPt.NRefPattern (NReference.reference_of_spec uri spec)