From 3d9b477715755d2c549d50f14ed727a8b7abbbf4 Mon Sep 17 00:00:00 2001
From: malc <av1474@comtv.ru>
Date: Wed, 10 Aug 2011 16:04:06 +0400
Subject: [PATCH] Consistency

---
 main.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/main.ml b/main.ml
index 7d251d4..8801e97 100644
--- a/main.ml
+++ b/main.ml
@@ -3532,7 +3532,7 @@ end;;
 let () =
   Arg.parse
     (Arg.align
-        ["-p", Arg.String (fun s -> state.password <- s) , " Set password"
+        [("-p", Arg.String (fun s -> state.password <- s) , " Set password")
         ;("-v", Arg.Unit (fun () -> print_endline Help.version; exit 0),
          " Print version and exit")]
     )
-- 
2.11.4.GIT