From: Artur Malabarba <am12548@it055607.users.bris.ac.uk>
Date: Tue, 3 Mar 2015 15:15:26 +0000 (+0000)
Subject: emacs-lisp/package.el (package-autoremove): Fix if logic.
X-Git-Tag: emacs-25.0.90~2564^2~255
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=bfbcec128a64c8d7d480140874c7bfa50ae803f7;p=emacs.git

emacs-lisp/package.el (package-autoremove): Fix if logic.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 16206e2b6e1..af7d0d81323 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2015-03-03  Artur Malabarba  <bruce.connor.am@gmail.com>
+
+	* emacs-lisp/package.el (package-autoremove): Fix if logic.
+
 2015-03-03  Martin Rudalics  <rudalics@gmx.at>
 
 	* window.el (window--dump-frame): For pixel height return total
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index de1158d96a7..885fb00ce75 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -1611,8 +1611,8 @@ will be deleted."
                    (mapconcat #'symbol-name removable ", ")))
             (mapc (lambda (p)
                     (package-delete (cadr (assq p package-alist)) t))
-              removable)
-            (message "Nothing to autoremove"))))))
+                  removable))
+        (message "Nothing to autoremove")))))
 
 (defun package-archive-base (desc)
   "Return the archive containing the package NAME."