Add a clean logger infrastructure.
[tatoo.git] / src / options.ml
index 142b709..61f0396 100644 (file)
@@ -7,10 +7,10 @@ let query = ref ""
 let stats = ref false
 
 let specs = align [
-  "-c", Set count, "";
-  "--count", Set count, " write the number of results only";
-  "-s", Set stats, "";
-  "--stats", Set stats, " display timing and various statistics";
+  "-c", Set count, " write the number of results only";
+  "--count", Set count, " ";
+  "-s", Set stats, " display timing and various statistics";
+  "--stats", Set stats, " ";
 ]
 
 let usage_msg = Printf.sprintf "usage: %s [options] input.xml query [output.xml]" Sys.argv.(0)