~ chicken-core (chicken-5) 364d04cf60cf21828968dc0cf66cfe2ac4e2bc85
commit 364d04cf60cf21828968dc0cf66cfe2ac4e2bc85 Author: felix <felix@call-with-current-continuation.org> AuthorDate: Tue Nov 15 16:35:30 2016 +0100 Commit: felix <felix@call-with-current-continuation.org> CommitDate: Tue Nov 15 16:35:30 2016 +0100 chicken-uninstall: bugfix diff --git a/chicken-uninstall.scm b/chicken-uninstall.scm index 3d12074c..6f073e7a 100644 --- a/chicken-uninstall.scm +++ b/chicken-uninstall.scm @@ -93,7 +93,7 @@ (lambda (f) (let ((p (if (absolute-pathname? f) f (make-pathname repo f)))) (when (file-exists? p) (delete-installed-file p)))) - (cdr files)) + files) (delete-installed-file ifile))) (define (delete-file-command platform)Trap