From 5b6ca8e7605ad8502307868e6bf841ad6a4b762f Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Fri, 8 May 2015 07:24:02 +0900 Subject: [PATCH] Handling case when impl version can't be detected. --- lib/chibi/snow/commands.scm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/lib/chibi/snow/commands.scm b/lib/chibi/snow/commands.scm index b7d7e7ae..386cc70d 100644 --- a/lib/chibi/snow/commands.scm +++ b/lib/chibi/snow/commands.scm @@ -33,8 +33,11 @@ (let ((msg (string-append "Implementation " (symbol->string (car spec)) - " is an unsupported version, " version ", but" - " at least " (fourth spec) " is required."))) + (if (string? version) + (string-append " is an unsupported version, " + version) + " is an unknown version") + ", but at least " (fourth spec) " is required."))) (cond (confirm? (yes-or-no? cfg msg " Install anyway?"))