diff --git a/scheme/install-lib/install-lib.scm b/scheme/install-lib/install-lib.scm
index 45bfe98..6ac9af4 100755
--- a/scheme/install-lib/install-lib.scm
+++ b/scheme/install-lib/install-lib.scm
@@ -1,5 +1,5 @@
 ;;; Installation library for scsh modules.
-;;; $Id: install-lib.scm,v 1.24 2004/11/13 20:14:57 michel-schinz Exp $
+;;; $Id: install-lib.scm,v 1.25 2005/08/20 15:45:02 michel-schinz Exp $
 
 ;; TODO
 ;; - think about --build: does it make sense?
@@ -287,7 +287,7 @@
 ;; Phases
 ;;
 
-(define all-phases '(build install))
+(define all-phases '(build build-clean install))
 
 (define all-phases-str (string-join (map symbol->string all-phases) ", "))
 
@@ -811,8 +811,8 @@
     ("force" #f "overwrite existing files during installation")
     ("no-user-defaults" #f "don't read defaults from ~/.scsh-pkg-defaults.scm")
     ;; advanced
-    ("phases" "phases" ,(string-append "perform only the given phase(s) "
-                                       "("all-phases-str")"))
+    ("phases" "phases" ("perform only the given phase(s) "
+                        ,(string-append "("all-phases-str")")))
     ("build" "name" "name of platform for which to build")
     ("layout-from" "file" "load layout of installation directory from file")
     ("dest-dir" "dir" ("specify prefix to use during installation"