[armedbear-cvs] r14440 - trunk/abcl/contrib/asdf-jar

[mevenson at common-lisp.net]

Author: mevenson
Date: Thu Mar 21 12:33:22 2013
New Revision: 14440

Log:
Restore ASDF-JAR:PACKAGE.

Modified:
   trunk/abcl/contrib/asdf-jar/asdf-jar.lisp

Modified: trunk/abcl/contrib/asdf-jar/asdf-jar.lisp
==============================================================================
--- trunk/abcl/contrib/asdf-jar/asdf-jar.lisp	Thu Mar 21 07:52:42 2013	(r14439)
+++ trunk/abcl/contrib/asdf-jar/asdf-jar.lisp	Thu Mar 21 12:33:22 2013	(r14440)
@@ -82,7 +82,7 @@
 
 (defun all-files (component)
   (loop :for c 
-     :being :each :hash-value :of (slot-value component 'asdf::components-by-name)
+     :being :each :hash-value :of (slot-value component 'asdf::children-by-name)
      :when (typep c 'asdf:module)
      :append (all-files c)
      :when (typep c 'asdf:source-file)