bin: Print error message and exit on user-error conditions.

This allows us to report fatal user errors and exit.

* bin/tissue (main): Print error message and exit on user-error
conditions.

1 files changed, 6 insertions, 1 deletions

diff --git a/bin/tissue b/bin/tissue
index 39c15e0..4e59d73 100755
--- a/bin/tissue
+++ b/bin/tissue
@@ -506,7 +506,12 @@ Pull latest from upstream repositories.
              => (lambda (git-error)
                   (display (git-error-message git-error) (current-error-port))
                   (newline (current-error-port))
-                  (exit #f))))
+                  (exit #f)))
+            ((and (user-error-condition? c)
+                  (message-condition? c))
+             (display (condition-message c) (current-error-port))
+             (newline (current-error-port))
+             (exit #f)))
     (match args
       ((_ (or "-h" "--help"))
        (print-usage))