asdf restart named in the keyword package

My original post seems to have gotten lost.  Here is is again.
:try-recompiling as a restart name seems an unnecessary pollution of the keyword
name-space, and inconsistent with already exported restarts retry and accept. 
Below is a small patch that places try-recompiling firmly in the asdf package.

Matt


Index: asdf.lisp
===================================================================
RCS file: /cvsroot/cclan/asdf/asdf.lisp,v
retrieving revision 1.118
diff -u -r1.118 asdf.lisp
--- asdf.lisp	29 May 2008 18:09:36 -0000	1.118
+++ asdf.lisp	16 Jun 2008 17:23:28 -0000
@@ -99,6 +99,7 @@
            #:circular-dependency        ; errors
            #:duplicate-names
 
+           #:try-recompiling
            #:retry
            #:accept                     ; restarts
 	   )
@@ -836,7 +837,7 @@
 	    (perform (make-instance 'asdf:compile-op) c))
 	   (t
 	    (with-simple-restart 
-		(:try-recompiling "Recompile ~a and try loading it again"
+		(try-recompiling "Recompile ~a and try loading it again"
 				  (component-name c))
 	      (setf state :failed-load)
 	      (call-next-method)
@@ -856,7 +857,7 @@
 	    (perform (make-instance 'asdf:compile-op) c))
 	   (t
 	    (with-simple-restart 
-		(:try-recompiling "Try recompiling ~a"
+		(try-recompiling "Try recompiling ~a"
 				  (component-name c))
 	      (setf state :failed-compile)
 	      (call-next-method)
 


-------------------------------------------------------------------------
Check out the new SourceForge.net Marketplace.
It's the best place to buy or sell services for
just about anything Open Source.
http://sourceforge.net/services/buy/index.php