string_fold_left (fun l c -> l @ flag_of_char c) [] s
let init myflags mylog =
- let s, m, a =
+ let m, a =
let g =
if List.mem Galax myflags
then MQIMap.empty_map else MQIMap.read_map
in g ()
in
{log = mylog; set = myflags;
- pgc = if List.mem Galax myflags then None else MQIPostgres.init s;
+ pgc =
+ if List.mem Galax myflags then
+ None
+ else
+ MQIPostgres.init
+ (Helm_registry.get "mathql_interpreter.postgresql_connection_string");
pgm = m; pga = a
}