From d5bebf1d282ee620f500393a40dc63eca29a1b10 Mon Sep 17 00:00:00 2001 From: Paul Pogonyshev Date: Thu, 10 Jan 2019 20:39:54 +0100 Subject: [PATCH] Make `package' not "uninhibit" messages --- lisp/emacs-lisp/package.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 1752c7e9fe..dc279f55c2 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -1605,7 +1605,7 @@ package-refresh-contents (make-directory package-user-dir t)) (let ((default-keyring (expand-file-name "package-keyring.gpg" data-directory)) - (inhibit-message async)) + (inhibit-message (or inhibit-message async))) (when (and package-check-signature (file-exists-p default-keyring)) (condition-case-unless-debug error (package-import-keyring default-keyring) @@ -3245,7 +3245,7 @@ package-menu--perform-transaction (redisplay 'force) (dolist (elt (package--sort-by-dependence delete-list)) (condition-case-unless-debug err - (let ((inhibit-message package-menu-async)) + (let ((inhibit-message (or inhibit-message package-menu-async))) (package-delete elt nil 'nosave)) (error (message "Error trying to delete `%s': %S" (package-desc-full-name elt) -- 2.19.2