let main () =
print_endline (Printf.sprintf "%d alive on path:%s owner:%s"
(Unix.getpid()) path owner);
+ Helm_registry.load_from "extractor.conf.xml";
Helm_registry.set "tmp.dir" path;
Http_getter.init ();
- let dbd =
- HSql.quick_connect
- ~host:(Helm_registry.get "db.host")
- ~user:(Helm_registry.get "db.user")
- ~database:(Helm_registry.get "db.database") ()
- in
+ let dbspec = LibraryDb.parse_dbd_conf () in
+ let dbd = HSql.quick_connect dbspec in
MetadataTypes.ownerize_tables owner;
let uris =
let ic = open_in (path ^ "/todo") in