From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 28 May 2003 11:24:51 +0000 (+0000)
Subject: (command-line-1): Use with-no-warnings.
X-Git-Tag: ttn-vms-21-2-B4~9897
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d759a2f5179978e436b0308f5344dd2a8fa5b5b6;p=emacs.git

(command-line-1): Use with-no-warnings.
---

diff --git a/lisp/startup.el b/lisp/startup.el
index 8b5361739f8..196ede15559 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1768,7 +1768,8 @@ normal otherwise."
     ;; clicks the menu bar during the sit-for.
     (when (display-popup-menus-p)
       (precompute-menubar-bindings))
-    (setq menubar-bindings-done t)
+    (with-no-warnings
+     (setq menubar-bindings-done t))
 
     ;; If *scratch* is selected and it is empty, insert an
     ;; initial message saying not to create a file there.