From f85e3af67a01561e3ee91f1296233c7bcb697cf8 Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Mon, 19 Sep 2022 02:07:52 +0530 Subject: bin: Define &user-error-condition. * bin/tissue (&user-error-condition): New condition type. --- bin/tissue | 3 +++ 1 file changed, 3 insertions(+) (limited to 'bin') diff --git a/bin/tissue b/bin/tissue index be83768..798602f 100755 --- a/bin/tissue +++ b/bin/tissue @@ -77,6 +77,9 @@ to run tissue." (match (command-line) ((program _ ...) program))) +(define-condition-type &user-error-condition &serious + make-user-error-condition user-error-condition?) + (define tissue-search (match-lambda* (("--help") -- cgit v1.2.3