- uri_predicate := BatchParser.uri_pred_of_conf !tryvars !varsprefix;
- let status = (ref [], ref [], ref []) in (* <ok, nok, maybe> URIs *)
+ if !varsprefix = "####" then varsprefix := !prefix ;
+ uri_predicate :=
+ BatchParser.uri_pred_of_conf !tryvars ~prefix:!prefix ~varsprefix:!varsprefix;
+ let status = (ref [], ref [], ref [], ref []) in (* <ok, nok, maybe, timeout> URIs *)