From cbb8b3e60623ef4266fc4505ecd5c83b6bdc60c5 Mon Sep 17 00:00:00 2001 From: pho4cexa Date: Wed, 7 Dec 2022 16:17:47 -0800 Subject: [PATCH] fix a type check that only csc catches --- main.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/main.scm b/main.scm index 9cfe4ed..39d0a3c 100755 --- a/main.scm +++ b/main.scm @@ -161,9 +161,9 @@ string-block (exit status))) (define (main args) - (let-optionals args ((html-repo-path '())) + (let-optionals args ((html-repo-path "")) - (when (null? html-repo-path) + (when (equal? html-repo-path "") (bail 1 "please specify a destination directory for html files")) (unless (in-git-directory?)