Simplifications.

[apps/madmutt.git] / tools / cpkg2c.mll

diff --git a/tools/cpkg2c.mll b/tools/cpkg2c.mll
index b04a849..388973a 100644 (file)
--- 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