From: Eli Zaretskii Date: Fri, 22 Nov 2019 14:36:25 +0000 (+0200) Subject: Fix uses of inhibit-message in package.el X-Git-Tag: emacs-27.0.90~553 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f373cec7f51653130bff0844262d356c2bf7c649;p=emacs.git Fix uses of inhibit-message in package.el * lisp/emacs-lisp/package.el (package-generate-autoloads) (package--compile, package--save-selected-packages): Don't use 'inhibit-message' to bind 'noninteractive' and 'save-silently', since 'inhibit-message' already disables all messages. (Bug#38264) --- diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 26207e03c4f..56e160232da 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -1002,8 +1002,6 @@ untar into a directory named DIR; otherwise, signal an error." (generated-autoload-file (expand-file-name auto-name pkg-dir)) ;; We don't need 'em, and this makes the output reproducible. (autoload-timestamps nil) - ;; Silence `autoload-generate-file-autoloads'. - (noninteractive inhibit-message) (backup-inhibited t) (version-control 'never)) (package-autoload-ensure-default-file generated-autoload-file) @@ -1029,7 +1027,6 @@ untar into a directory named DIR; otherwise, signal an error." This assumes that `pkg-desc' has already been activated with `package-activate-1'." (let ((warning-minimum-level :error) - (save-silently inhibit-message) (load-path load-path)) (byte-recompile-directory (package-desc-dir pkg-desc) 0 t))) @@ -1840,8 +1837,7 @@ Used to populate `package-selected-packages'." (when value (setq package-selected-packages value)) (if after-init-time - (let ((save-silently inhibit-message)) - (customize-save-variable 'package-selected-packages package-selected-packages)) + (customize-save-variable 'package-selected-packages package-selected-packages) (add-hook 'after-init-hook #'package--save-selected-packages))) (defun package--user-selected-p (pkg)