Don't show the "Suppressed exit" message when exit is called

2014-02-07 16:58:59 -08:00 · 2014-02-07 16:58:59 -08:00 · 4f24b89e3b
commit 4f24b89e3b
parent 6395e6eb4d
1 changed files with 1 additions and 1 deletions
--- a/leiningen-core/src/leiningen/core/main.clj
+++ b/leiningen-core/src/leiningen/core/main.clj
@ -112,7 +112,7 @@
     (if *exit-process?*
       (do (shutdown-agents)
           (System/exit exit-code))
-       (throw (ex-info "Suppressed exit" {:exit-code exit-code}))))
+       (throw (ex-info "Suppressed exit" {:exit-code exit-code :suppress-msg true}))))
  ([] (exit 0)))

 (defn abort