diff --git a/lisp/startup.el b/lisp/startup.el
index bb6250d3968..e5ec15eebea 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1596,7 +1596,8 @@ please check its value")
   ;; or EMACSLOADPATH, so we basically always have to check.
   (let (warned)
     (dolist (dir load-path)
-      (and (not warned)
+      (and (not noninteractive)
+           (not warned)
 	   (stringp dir)
 	   (string-equal (file-name-as-directory (expand-file-name dir))
 			 (expand-file-name user-emacs-directory))