Changeset 14594

Timestamp:

01/05/14 17:07:50 (9 years ago)

Author:

Mark Evenson

Message:

Be more explicit about what is happening to ASDF:*CENTRAL-REGISTRY* to *LOAD-VERBOSE*.

Location:

trunk/abcl/contrib/asdf-install

Files:

• asdf-install.asd (modified) (1 diff)
• variables.lisp (modified) (1 diff)

trunk/abcl/contrib/asdf-install/asdf-install.asd

@@ -13 +13 @@
   #+:sbcl :depends-on
   #+:sbcl (sb-bsd-sockets)
-  :version "0.6.10.2"
+  :version "0.6.10.3"
   :description "<> asdf:defsystem <urn:abcl.org/release/1.3.0-dev/contrib/asdf-install#0.6.10.2>"
   :author "Dan Barlow <dan@telent.net>, Edi Weitz <edi@agharta.de> and many others. See the file COPYRIGHT for more details."
-  :maintainer "Gary Warren King <gwking@metabang.com>"
+  :maintainer "Gary Warren King <gwking@metabang.com> // ABCL <evenson@not.org> ."
   :components ((:file "defpackage")
                (:file "split-sequence" :depends-on ("defpackage"))

trunk/abcl/contrib/asdf-install/variables.lisp

@@ -118 +118 @@
   (pathname-sans-name+type (user-homedir-pathname)))
 
+(defparameter *asdf-install-verbose* t)
+(export '*asdf-install-verbose*)
+
 #+abcl
 (eval-when (:load-toplevel)
   (require 'asdf)
   (dolist (location *locations*)
-    (pushnew (second location) asdf:*central-registry*)))
+  (let
+    ((asdf-designator (second location)))
+    (format *asdf-install-verbose* "Adding ~A to ASDF." asdf-designator)
+    (pushnew (second location) asdf:*central-registry*))))
+