From afd887e672510ac9445b600c52d99f5e60680584 Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Fri, 11 Jan 2019 08:48:45 +0800 Subject: [PATCH] update-repository shouldn't exit --- lib/chibi/snow/commands.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/chibi/snow/commands.scm b/lib/chibi/snow/commands.scm index 754586cf..c2fe54ef 100644 --- a/lib/chibi/snow/commands.scm +++ b/lib/chibi/snow/commands.scm @@ -1145,9 +1145,9 @@ `(,(car repo) (url ,repo-uri) ,@(cdr repo)))))) (cond ((not (valid-repository? repo)) - (die 2 "not a valid repository: " repo-uri)) + (warn "not a valid repository: " repo-uri repo)) ((not (create-directory* local-dir)) - (die 2 "can't create directory: " local-dir)) + (warn "can't create directory: " local-dir)) (else (guard (exn (else (die 2 "couldn't write repository"))) (call-with-output-file local-tmp