let lexicon = LexiconMarshal.load_lexicon lexiconpath in
let status = List.fold_left eval_command status lexicon in
if Helm_registry.get_bool "db.nodb" then
- let metadatapath = baseuri ^ ".metadata" in
+ let metadatapath = LibraryMisc.metadata_file_of_baseuri ~basedir ~baseuri in
if not (Sys.file_exists metadatapath) then
raise (MetadataNotFound metadatapath)
else