summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/package.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp/package.el')
-rw-r--r--lisp/emacs-lisp/package.el9
1 files changed, 3 insertions, 6 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index c322ce8cc56..eae75621f4c 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -1428,12 +1428,9 @@ The file can either be a tar file or an Emacs Lisp file."
when (assq name package-alist)
collect name))
(indirect-deps (unless (eq only 'direct)
- (cl-loop for p in direct-deps
- for dep = (cadr (assq p package-alist))
- when (and dep (assq p package-alist))
- append (mapcar 'car
- (package-desc-reqs
- dep))))))
+ (apply #'append
+ direct-deps
+ (mapcar #'package--get-deps direct-deps)))))
(cl-case only
(direct direct-deps)
(separate (list direct-deps indirect-deps))