debug_prerr "clean_baseuris called on:";
if debug then
List.iter debug_prerr buris;
let l =
if Helm_registry.get_bool "db.nodb" then
debug_prerr "clean_baseuris called on:";
if debug then
List.iter debug_prerr buris;
let l =
if Helm_registry.get_bool "db.nodb" then