diff options
| author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-01-18 10:38:19 -0200 |
|---|---|---|
| committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-01-18 10:39:26 -0200 |
| commit | 8ab85ee7ce9ad101583620e7ba3bee39cf3491ae (patch) | |
| tree | bda435f4c1b86668d867bae3edd3b22912816c74 /lisp/emacs-lisp | |
| parent | 3ccbda730d654949b774a7ff99a759957991cb5c (diff) | |
| download | emacs-8ab85ee7ce9ad101583620e7ba3bee39cf3491ae.tar.gz emacs-8ab85ee7ce9ad101583620e7ba3bee39cf3491ae.tar.bz2 emacs-8ab85ee7ce9ad101583620e7ba3bee39cf3491ae.zip | |
(package--append-to-alist): Updated docstring due to new name.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/package.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 07ddddddb99..0f094b556ba 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -1157,10 +1157,12 @@ Also, add the originating archive to the `package-desc' structure." (package--append-to-alist pkg-desc package-archive-contents))))) (defun package--append-to-alist (pkg-desc alist) - "Add PKG-DESC to ALIST. + "Append an entry for PKG-DESC to the start of ALIST and return it. +This entry takes the form (`package-desc-name' PKG-DESC). -Packages are grouped by name. The package descriptions are sorted -by version number." +If ALIST already has an entry with this name, destructively add +PKG-DESC to the cdr of this entry instead, sorted by version +number." (let* ((name (package-desc-name pkg-desc)) (priority-version (package-desc-priority-version pkg-desc)) (existing-packages (assq name alist))) |