Fix package.
authorFrancois-Rene Rideau <tunes@google.com>
Mon, 30 Jul 2012 18:48:27 +0000 (14:48 -0400)
committerFrancois-Rene Rideau <tunes@google.com>
Mon, 30 Jul 2012 18:48:27 +0000 (14:48 -0400)
package.lisp

index cc2dfa0..d8be464 100644 (file)
@@ -8,8 +8,9 @@
       ;; aif it
       appendf orf
       length=n-p
+      featurep
       remove-keys remove-keyword
-      first-char last-char ends-with
+      first-char last-char string-suffix-p
       directory-pathname-p ensure-directory-pathname
       absolute-pathname-p ensure-pathname-absolute pathname-root
       getenv getenv-pathname getenv-pathnames
       subdirectories directory-files
       while-collecting
       *wild* *wild-file* *wild-directory* *wild-inferiors*
-      *wild-path* wilden directorize-pathname-host-device))
+      *wild-path* wilden directorize-pathname-host-device)))
 
 
 (defpackage :asdf-utils
   (:use :common-lisp :asdf)
   (:import-from :asdf . #.*asdf-utils-exports*)
-  (:export . #.*asdf-utils-exports*))
+  (:export . #.(mapcar 'string *asdf-utils-exports*)))
+
+(defpackage :asdf-utils-no-alexandria
+  (:use :common-lisp :asdf-utils)
+  (:export . #.(mapcar 'string (set-difference *asdf-utils-exports* '(appendf ends-with featurep)))))