From: Pierre Habouzit <madcoder@debian.org>
Date: Wed, 28 Nov 2007 14:07:10 +0000 (+0100)
Subject: stupid ocaml.
X-Git-Url: http://git.madism.org/?a=commitdiff_plain;h=e2125d3be29ac147fdc79a6bba86f5c7e6da018b;p=apps%2Fmadmutt.git

stupid ocaml.
---

diff --git a/tools/cpkg2c.mll b/tools/cpkg2c.mll
index b04a849..388973a 100644
--- a/tools/cpkg2c.mll
+++ b/tools/cpkg2c.mll
@@ -627,7 +627,7 @@ int luaopen_%s(lua_State *L)
   let warn ob = output_endline ob "/*** THIS FILE IS AUTOGENERATED !!! ***/"
 
   let process fn file l =
-    try Unix.unlink file with _ -> ();
+    (try Unix.unlink file with _ -> ());
     let ob = open_out_gen  [ Open_trunc ; Open_wronly; Open_creat ] 0o444 file in
     warn ob; fn ob l; close_out ob