~ chicken-core (chicken-5) 6497179f056be28460dfa55ffcb79ca8a37a3dbc
commit 6497179f056be28460dfa55ffcb79ca8a37a3dbc
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Feb 18 14:17:50 2010 +0100
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Thu Feb 18 14:17:50 2010 +0100
apply mappings from setup.defaults also to indirect requirements
diff --git a/chicken-install.scm b/chicken-install.scm
index 0ce7f68c..933a44e2 100644
--- a/chicken-install.scm
+++ b/chicken-install.scm
@@ -285,6 +285,7 @@
(let ([meta (with-input-from-file mfile read)])
(print "checking dependencies for `" (car e+d+v) "' ...")
(let-values ([(missing upgrade) (outdated-dependencies meta)])
+ (set! missing (apply-mappings missing)) ;XXX only missing - wrong?
(set! *dependencies*
(cons
(cons (car e+d+v)
Trap