~ chicken-core (chicken-5) 4181d474fb1f5fa451f092b894c85b9d6d20ffca

commit 4181d474fb1f5fa451f092b894c85b9d6d20ffca
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Nov 19 17:20:29 2009 +0100
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Thu Nov 19 17:21:24 2009 +0100

    -force should override chicken-version check in chicken-install

diff --git a/chicken-install.scm b/chicken-install.scm
index 2c6e4243..4b34f21c 100644
--- a/chicken-install.scm
+++ b/chicken-install.scm
@@ -156,7 +156,8 @@
                        (cond ((not v)
                               (loop rest (cons (->string (car dep)) missing) upgrade))
                              ((not (version>=? v (->string (cadr dep))))
-			      (when (string=? "chicken" (->string (car dep)))
+			      (when (and (string=? "chicken" (->string (car dep)))
+					 (not *force*))
 				(error
 				 (string-append 
 				  "Your CHICKEN version is not recent enough to use this extension - version "
@@ -519,6 +520,7 @@ EOF
 
   (handle-exceptions ex
       (begin
+	(newline (current-error-port))
         (print-error-message ex (current-error-port))
         (cleanup)
         (exit 1))