~ chicken-core (chicken-5) 2c7c6cca5026c6a3857547a7e1b499fa1e0219e5
commit 2c7c6cca5026c6a3857547a7e1b499fa1e0219e5
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Fri Jan 15 16:06:07 2010 +0100
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Fri Jan 15 16:07:21 2010 +0100
fixed construction of dep.-list in chicken-install (#159)
diff --git a/chicken-install.scm b/chicken-install.scm
index 295deb6e..78f7f5ee 100644
--- a/chicken-install.scm
+++ b/chicken-install.scm
@@ -265,7 +265,12 @@
(let-values ([(missing upgrade) (outdated-dependencies meta)])
(set! *dependencies*
(cons
- (cons (car e+d+v) (append missing upgrade))
+ (cons (car e+d+v)
+ (map (lambda (mu)
+ (if (pair? mu)
+ (car mu)
+ mu))
+ (append missing upgrade)))
*dependencies*))
(when (pair? missing)
(print " missing: " (string-intersperse missing ", "))
Trap