(package--append-to-alist): Updated docstring due to new name.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 07c873d8a68f715e30cdde4ff14124788c8ac2a4..b7a1fb943a32d7b66758bae5d1a13147d2eb22f4 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -2,6 +2,7 @@
 
        * emacs-lisp/package.el (package--append-to-alist): Renamed from
        `package--add-to-alist'
+       Updated docstring due to new name.
 
 2015-01-18  Leo Liu  <sdl.web@gmail.com>
 

diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 07ddddddb99f9767c8893ded95ed34d7f3f2b0de..0f094b556ba93f69aab98ccaa7da47121a7eb156 100644 (file)
--- 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)))