~ chicken-core (chicken-5) da7609b71734ae8703f5e03d150f5340508babe4
commit da7609b71734ae8703f5e03d150f5340508babe4
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Sat Nov 12 23:40:36 2016 +0100
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Sun Nov 13 11:41:49 2016 +0100
resurrecteed -override
diff --git a/chicken-install.scm b/chicken-install.scm
index b7f8ed94..06a38ced 100644
--- a/chicken-install.scm
+++ b/chicken-install.scm
@@ -852,6 +852,11 @@
((equal? arg "-purge")
(set! purge-mode #t)
(loop (cdr args)))
+ ((equal? arg "-override")
+ (unless (pair? (cdr args)) (usage 1))
+ (set! override
+ (call-with-input-file (cadr args) read-all))
+ (loop (cddr args)))
;;XXX
Trap