~ chicken-core (chicken-5) f3dc35978412af59e4e96fc4a7180dba25692c54
commit f3dc35978412af59e4e96fc4a7180dba25692c54
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Mon Jan 11 08:10:19 2010 +0100
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Mon Jan 11 08:10:19 2010 +0100
bugfix in chicken-install
diff --git a/chicken-install.scm b/chicken-install.scm
index 411f5aa4..30fb40ce 100644
--- a/chicken-install.scm
+++ b/chicken-install.scm
@@ -444,8 +444,8 @@ EOF
(string=? arg "--help"))
(usage 0))
((string=? arg "-repository")
- ((printf "~A" (repository-path))
- (exit 0)))
+ (printf "~a" (repository-path))
+ (exit 0))
((string=? arg "-force")
(set! *force* #t)
(loop (cdr args) eggs))
Trap