[elpa] externals/async 67c3695 01/27: Fix async-bytecomp--get-package-deps according to

[ELPA Syncer]

branch: externals/async
commit 67c369555de998eaabd60056dead038c6c50b8fd
Author: Thierry Volpiatto <thierry.volpiatto@gmail.com>
Commit: Thierry Volpiatto <thierry.volpiatto@gmail.com>

    Fix async-bytecomp--get-package-deps according to
    
    emacs package--get-deps last changes (b12edc61711).
    
    * async-bytecomp.el (async-bytecomp--get-package-deps): Use package
    names and not whole object.
---
 async-bytecomp.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/async-bytecomp.el b/async-bytecomp.el
index d2243b8..9f32035 100644
--- a/async-bytecomp.el
+++ b/async-bytecomp.el
@@ -125,13 +125,13 @@ All *.elc files are systematically deleted before 
proceeding."
   (let ((seen '()))
     (while pkgs
       (let ((pkg (pop pkgs)))
-        (if (memq pkg seen)
-            nil ;; Done already!
+        (unless (memq pkg seen)
           (let ((pkg-desc (cadr (or (assq pkg package-archive-contents)
                                     (assq pkg package-alist)))))
             (when pkg-desc
               (push pkg seen)
-              (setq pkgs (append (package-desc-reqs pkg-desc) pkgs)))))))
+              (setq pkgs (append (mapcar #'car (package-desc-reqs pkg-desc))
+                                 pkgs)))))))
     seen))
 
 (defadvice package--compile (around byte-compile-async)