Commit 8334021e authored by Artur Malabarba's avatar Artur Malabarba
Browse files

package.el (package--get-deps): Fix for indirect dependencies.

parent 5329208b
......@@ -2,6 +2,7 @@
* emacs-lisp/package.el (package-selected-packages): Fix :type
(package-install): Rename ARG to MARK-SELECTED.
(package--get-deps): Fix for indirect dependencies.
2015-02-01 Thierry Volpiatto <thierry.volpiatto@gmail.com>
......
......@@ -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))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment