(list-load-path-shadows): Don't say

anything if we are not interactive and nothing is wrong.

diff --git a/lisp/emacs-lisp/shadow.el b/lisp/emacs-lisp/shadow.el
index edaa74e6a3e6abd74993ffdd4da09f7499550c63..57fc13b09d8b1e0d9fd93b988e8505db05f1a475 100644 (file)
--- a/lisp/emacs-lisp/shadow.el
+++ b/lisp/emacs-lisp/shadow.el
@@ -249,11 +249,11 @@ buffer called `*Shadows*'.  Shadowings are located by calling the
          (message "This site has duplicate Lisp libraries with the same name.
 If a locally-installed Lisp library overrides a library in the Emacs release,
 that can cause trouble, and you should probably remove the locally-installed
-version unless you know what you are doing.\n"))
-       (while shadows
-         (message "%s hides %s" (car shadows) (car (cdr shadows)))
-         (setq shadows (cdr (cdr shadows))))
-       (message "%s" msg)))))
+version unless you know what you are doing.\n")
+         (while shadows
+           (message "%s hides %s" (car shadows) (car (cdr shadows)))
+           (setq shadows (cdr (cdr shadows))))
+         (message "%s" msg))))))
 
 (provide 'shadow)