[slime-cvs] CVS slime/contrib

[CVS User sboukarev]

Update of /project/slime/cvsroot/slime/contrib
In directory cl-net:/tmp/cvs-serv10791

Modified Files:
	ChangeLog swank-asdf.lisp 
Log Message:
* swank-asdf.lisp (asdf-central-registry): Use an exported
interface for ASDF2.


--- /project/slime/cvsroot/slime/contrib/ChangeLog	2010/06/14 15:27:24	1.392
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2010/06/15 08:50:29	1.393
@@ -1,3 +1,8 @@
+2010-06-15  Stas Boukarev  <stassats at gmail.com>
+
+	* swank-asdf.lisp (asdf-central-registry): Use an exported
+	interface for ASDF2.
+
 2010-06-14  Stas Boukarev  <stassats at gmail.com>
 
 	* swank-asdf.lisp (asdf-central-registry): ASDF2 compatibility.
--- /project/slime/cvsroot/slime/contrib/swank-asdf.lisp	2010/06/14 15:27:24	1.28
+++ /project/slime/cvsroot/slime/contrib/swank-asdf.lisp	2010/06/15 08:50:29	1.29
@@ -70,7 +70,7 @@
 
 (defun asdf-central-registry ()
   (append asdf:*central-registry*
-          #+asdf2 (car asdf::*source-registry*)))
+          #+asdf2 (asdf:ensure-source-registry)))
 
 (defslimefun list-all-systems-in-central-registry ()
   "Returns a list of all systems in ASDF's central registry."