diff options
| author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-02-02 13:26:40 -0200 |
|---|---|---|
| committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-02-02 13:26:40 -0200 |
| commit | 8ad2ee33a1107afe2d35e3ba4506d45dbb4c13d2 (patch) | |
| tree | 2743fc0c86e913a3a8a84888e5c25b672aae955a /lisp/emacs-lisp/package.el | |
| parent | ef6fa2fe0dbc09a637239b039bce5668c5215321 (diff) | |
| download | emacs-8ad2ee33a1107afe2d35e3ba4506d45dbb4c13d2.tar.gz emacs-8ad2ee33a1107afe2d35e3ba4506d45dbb4c13d2.tar.bz2 emacs-8ad2ee33a1107afe2d35e3ba4506d45dbb4c13d2.zip | |
emacs-lisp/package.el (package--get-deps): Fix returning duplicates.
Diffstat (limited to 'lisp/emacs-lisp/package.el')
| -rw-r--r-- | lisp/emacs-lisp/package.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index c4a658b3d2e..16271060626 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -1428,9 +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) - (apply #'append - direct-deps - (mapcar #'package--get-deps direct-deps))))) + (delete-dups + (cl-loop for p in direct-deps + append (package--get-deps p)))))) (cl-case only (direct direct-deps) (separate (list direct-deps indirect-deps)) |