diff options
| author | Richard M. Stallman | 2005-08-09 02:57:57 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2005-08-09 02:57:57 +0000 |
| commit | 67d28657d0544b0ecca810ec958c3e0ef701b064 (patch) | |
| tree | fd25e7a6cba1916bc970710147f31a8914fc1cde | |
| parent | c7c93bd96e9eac1b18353c87cbe039f118a3c908 (diff) | |
| download | emacs-67d28657d0544b0ecca810ec958c3e0ef701b064.tar.gz emacs-67d28657d0544b0ecca810ec958c3e0ef701b064.zip | |
(lucid-menubar-map, lucid-failing-menubar)
(recompute-lucid-menubar): Add defvars.
| -rw-r--r-- | lisp/emacs-lisp/lmenu.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/lmenu.el b/lisp/emacs-lisp/lmenu.el index 168d6fde1f4..68d3a3de9a9 100644 --- a/lisp/emacs-lisp/lmenu.el +++ b/lisp/emacs-lisp/lmenu.el | |||
| @@ -32,8 +32,10 @@ | |||
| 32 | ;; Arrange to use current-menubar to set up part of the menu bar. | 32 | ;; Arrange to use current-menubar to set up part of the menu bar. |
| 33 | 33 | ||
| 34 | (defvar current-menubar) | 34 | (defvar current-menubar) |
| 35 | (defvar lucid-menubar-map) | ||
| 36 | (defvar lucid-failing-menubar) | ||
| 35 | 37 | ||
| 36 | (setq recompute-lucid-menubar 'recompute-lucid-menubar) | 38 | (defvar recompute-lucid-menubar 'recompute-lucid-menubar) |
| 37 | (defun recompute-lucid-menubar () | 39 | (defun recompute-lucid-menubar () |
| 38 | (define-key lucid-menubar-map [menu-bar] | 40 | (define-key lucid-menubar-map [menu-bar] |
| 39 | (condition-case nil | 41 | (condition-case nil |