[armedbear-cvs] r13031 - trunk/abcl/contrib/asdf-install

[Mark Evenson]

Author: mevenson
Date: Fri Nov 19 13:23:31 2010
New Revision: 13031

Log:
Ensure that the ASDF registry contains the ASDF-INSTALL install locations.

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

Modified: trunk/abcl/contrib/asdf-install/variables.lisp
==============================================================================
--- trunk/abcl/contrib/asdf-install/variables.lisp	(original)
+++ trunk/abcl/contrib/asdf-install/variables.lisp	Fri Nov 19 13:23:31 2010
@@ -114,3 +114,9 @@
 
 (defvar *temporary-directory* 
   (pathname-sans-name+type (user-homedir-pathname)))
+
+#+abcl
+(eval-when (:load-toplevel)
+  (require 'asdf)
+  (dolist (location *locations*)
+    (pushnew (second location) asdf:*central-registry*)))