[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: package.el dependencies
From: |
Artur Malabarba |
Subject: |
Re: package.el dependencies |
Date: |
Tue, 3 Feb 2015 10:05:09 +0000 |
On 3 Feb 2015 05:45, "Thierry Volpiatto" <address@hidden> wrote:
>
>
> The first thing we have to fix now is package--get-deps, Arthur, yes you
> are right we should recurse without the 'direct flag, so we should use
> this version:
>
> (defun package--get-deps (pkg &optional only)
> (let* ((pkg-desc (cadr (assq pkg package-alist)))
> (direct-deps (cl-loop for p in (package-desc-reqs pkg-desc)
> for name = (car p)
> when (assq name package-alist)
> collect name))
> (indirect-deps (unless (eq only 'direct)
> (cl-loop for p in direct-deps
> append (package--get-deps p) into lst
> finally return (delete-dups lst)))))
> (cl-case only
> (direct direct-deps)
> (separate (list direct-deps indirect-deps))
> (indirect indirect-deps)
> (t (append direct-deps indirect-deps)))))
>
>
> Can you push it ?
Yes, but possibly not today.
- Re: package.el dependencies, (continued)
Re: package.el dependencies, Thierry Volpiatto, 2015/02/02
Re: package.el dependencies, Artur Malabarba, 2015/02/03
Re: package.el dependencies, Thierry Volpiatto, 2015/02/02