From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 9 Aug 2005 02:57:57 +0000 (+0000)
Subject: (lucid-menubar-map, lucid-failing-menubar)
X-Git-Tag: emacs-pretest-22.0.90~7727
X-Git-Url: https://code.delx.au/gnu-emacs/commitdiff_plain/67d28657d0544b0ecca810ec958c3e0ef701b064

(lucid-menubar-map, lucid-failing-menubar)
(recompute-lucid-menubar): Add defvars.
---

diff --git a/lisp/emacs-lisp/lmenu.el b/lisp/emacs-lisp/lmenu.el
index 168d6fde1f..68d3a3de9a 100644
--- a/lisp/emacs-lisp/lmenu.el
+++ b/lisp/emacs-lisp/lmenu.el
@@ -32,8 +32,10 @@
 ;; Arrange to use current-menubar to set up part of the menu bar.
 
 (defvar current-menubar)
+(defvar lucid-menubar-map)
+(defvar lucid-failing-menubar)
 
-(setq recompute-lucid-menubar 'recompute-lucid-menubar)
+(defvar recompute-lucid-menubar 'recompute-lucid-menubar)
 (defun recompute-lucid-menubar ()
   (define-key lucid-menubar-map [menu-bar]
     (condition-case nil