diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2013-06-25 20:44:35 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2013-06-25 20:44:35 -0400 |
| commit | a49ff80c244b14225a1384206b5c48683f72fa8e (patch) | |
| tree | a6a340c2ccd825c1828446b7bdc436579ee88f2a | |
| parent | 26bf2b82d8a028a42cf8ad8f0aa284561c4cde7f (diff) | |
| download | emacs-a49ff80c244b14225a1384206b5c48683f72fa8e.tar.gz | |
* lisp/emacs-lisp/package.el (package--add-to-archive-contents): Add missing
nil to terminate the loop.
Fixes: debbugs:14718
| -rw-r--r-- | lisp/ChangeLog | 7 | ||||
| -rw-r--r-- | lisp/emacs-lisp/package.el | 4 |
2 files changed, 9 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 493052d4dcb..3ac3a0f2b92 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2013-06-26 Stefan Monnier <monnier@iro.umontreal.ca> + + * emacs-lisp/package.el (package--add-to-archive-contents): Add missing + nil terminate the loop (bug#14718). + 2013-06-25 Lars Magne Ingebrigtsen <larsi@gnus.org> * net/eww.el: Rework history traversal. When going forward/back, @@ -24,7 +29,7 @@ 2013-06-25 Lars Magne Ingebrigtsen <larsi@gnus.org> - * net/eww.el (eww-copy-page-url): Changed name of command. + * net/eww.el (eww-copy-page-url): Change name of command. * net/shr.el (shr-map): Change `shr-copy-url' from `u' to `w' to be more consistent with Info and dired. diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index e141ea572f1..32339249085 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -3,6 +3,7 @@ ;; Copyright (C) 2007-2013 Free Software Foundation, Inc. ;; Author: Tom Tromey <tromey@redhat.com> +;; Daniel Hackney <dan@haxney.org> ;; Created: 10 Mar 2007 ;; Version: 1.0.1 ;; Keywords: tools @@ -924,7 +925,8 @@ Also, add the originating archive to the `package-desc' structure." (version-list-< version (package-desc-version (cadr existing-packages)))) (setq existing-packages (cdr existing-packages)) - (push pkg-desc (cdr existing-packages)))))))) + (push pkg-desc (cdr existing-packages)) + nil)))))) (defun package-download-transaction (packages) "Download and install all the packages in PACKAGES. |