diff options
| -rw-r--r-- | lisp/emacs-lisp/package.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 949ad711ae3..7b779b5ae5b 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el | |||
| @@ -1625,7 +1625,7 @@ downloads in the background." | |||
| 1625 | (make-directory package-user-dir t)) | 1625 | (make-directory package-user-dir t)) |
| 1626 | (let ((default-keyring (expand-file-name "package-keyring.gpg" | 1626 | (let ((default-keyring (expand-file-name "package-keyring.gpg" |
| 1627 | data-directory)) | 1627 | data-directory)) |
| 1628 | (inhibit-message async)) | 1628 | (inhibit-message (or inhibit-message async))) |
| 1629 | (when (and package-check-signature (file-exists-p default-keyring)) | 1629 | (when (and package-check-signature (file-exists-p default-keyring)) |
| 1630 | (condition-case-unless-debug error | 1630 | (condition-case-unless-debug error |
| 1631 | (package-import-keyring default-keyring) | 1631 | (package-import-keyring default-keyring) |
| @@ -3261,7 +3261,7 @@ objects removed." | |||
| 3261 | (redisplay 'force) | 3261 | (redisplay 'force) |
| 3262 | (dolist (elt (package--sort-by-dependence delete-list)) | 3262 | (dolist (elt (package--sort-by-dependence delete-list)) |
| 3263 | (condition-case-unless-debug err | 3263 | (condition-case-unless-debug err |
| 3264 | (let ((inhibit-message package-menu-async)) | 3264 | (let ((inhibit-message (or inhibit-message package-menu-async))) |
| 3265 | (package-delete elt nil 'nosave)) | 3265 | (package-delete elt nil 'nosave)) |
| 3266 | (error (message "Error trying to delete `%s': %S" | 3266 | (error (message "Error trying to delete `%s': %S" |
| 3267 | (package-desc-full-name elt) | 3267 | (package-desc-full-name elt) |