From b7bb58381961ddb74fe347a2c4076113c73d75a6 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 6 Jun 2012 08:51:48 -0400 Subject: * lisp/emacs-lisp/macroexp.el (macroexpand-all-1): Don't spam the output with "loading" messages. Fixes: debbugs:11635 --- lisp/emacs-lisp/macroexp.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/macroexp.el b/lisp/emacs-lisp/macroexp.el index b021abe71ea..514824554d1 100644 --- a/lisp/emacs-lisp/macroexp.el +++ b/lisp/emacs-lisp/macroexp.el @@ -188,7 +188,8 @@ Assumes the caller has bound `macroexpand-all-environment'." (or (not (eq (car-safe (symbol-function func)) 'autoload)) (ignore-errors - (load (nth 1 (symbol-function func)))))) + (load (nth 1 (symbol-function func)) + 'noerror 'nomsg)))) ;; Follow the sequence of aliases. (setq func (symbol-function func))) (if (null handler) -- cgit v1.2.3