Parcourir la source

Add cautions about last commit

Leo il y a 8 ans
Parent
commit
00917ebe0e
1 fichiers modifiés avec 2 ajouts et 0 suppressions
  1. 2 0
      src/command_def.ml

+ 2 - 0
src/command_def.ml

@@ -339,6 +339,8 @@ let run ~version ~build_info () =
            | Error _ -> parse_sub ())
     with
     | () -> `Exit 0
+    (* XXX Command.basic function catch exceptions, so this doesn't actually
+     * work. We may to place it before basic function to fix the problem. *)
     | exception message ->
       "Exception: " ^ (Exn.to_string message)
       |> Messages.warning;