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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 16206e2b6e16d1f567e8cf18038da2bf3da4c2ce..af7d0d81323034e7cf2a4b033338796122553983 100644 (file)
--- 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 de1158d96a7a96efe58b4f4eb85690b146091c92..885fb00ce759d1df28d0ba80dd12238f433de1b4 100644 (file)
--- 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."