cosmetic changes

diff --git a/helm/ocaml/metadata/metadataConstraints.ml b/helm/ocaml/metadata/metadataConstraints.ml
index fe972b0bbd471a667777aff9d8c158998fcf385d..15177ddb1331d04b118eea1838e8a9dd2cbc9c45 100644 (file)
--- a/helm/ocaml/metadata/metadataConstraints.ml
+++ b/helm/ocaml/metadata/metadataConstraints.ml
@@ -152,7 +152,7 @@ let add_constraint ?(start=0) ?(tables=default_tables) (n,from,where) metadata =
       ((n+2), from, where)
 
 let exec ~(dbd:Mysql.dbd) ?rating (n,from,where) =
-let from = String.concat ", " from in
+  let from = String.concat ", " from in
   let where = String.concat " and " where in
   let query =
     match rating with
@@ -163,7 +163,7 @@ let from = String.concat ", " from in
             and table0.source = hits.source order by hits.no desc")
           from where 
   in
-  prerr_endline query; 
+(*  prerr_endline query; *)
   let result = Mysql.exec dbd query in
   Mysql.map result
     (fun row -> match row.(0) with Some s -> s | _ -> assert false)