~ chicken-core (chicken-5) 6fd1299372454078d19e5687d48871129fe29eb5

commit 6fd1299372454078d19e5687d48871129fe29eb5
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Jan 7 13:18:54 2010 +0100
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Thu Jan 7 13:18:54 2010 +0100

    chicken-uninstall uses glob instead of regex; mini-salmonella fixes

diff --git a/chicken-uninstall.scm b/chicken-uninstall.scm
index f56147c3..b0078624 100644
--- a/chicken-uninstall.scm
+++ b/chicken-uninstall.scm
@@ -112,7 +112,7 @@ EOF
 			     (loop (append (map (cut string #\- <>) sos) (cdr args)) pats)
 			     (usage 1)))
 		       (usage 1)))
-		  (else (loop (cdr args) (cons arg pats))))))))
+		  (else (loop (cdr args) (cons (glob->regexp arg) pats))))))))
 
   (main (command-line-arguments))
   
diff --git a/scripts/mini-salmonella.scm b/scripts/mini-salmonella.scm
index ae21fe50..2ed58e54 100644
--- a/scripts/mini-salmonella.scm
+++ b/scripts/mini-salmonella.scm
@@ -62,7 +62,7 @@
 (define (install-egg egg dir)
   (let ((status
 	 (system
-	  (sprintf "~a -force -t local -l ~a ~a ;2>~a >nul:"
+	  (sprintf "~a -t local -l ~a ~a ";2>~a >nul:"
 		   *chicken-install*
 		   (normalize-pathname *eggdir*)
 		   egg