(menu-bar-mode): Customize.

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 2c08e4f5b668c1518341eccfb96c027c8356abdc..85083fc03f9d359dae23d25ac1a737cc7658435e 100644 (file)
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -829,7 +829,15 @@ Do the same for the keys of the same name."
        minibuffer-local-map
        minibuffer-local-completion-map))
 \f
-(defvar menu-bar-mode nil)
+(defcustom menu-bar-mode nil
+  "Toggle display of a menu bar on each frame.
+Setting this variable directly does not take effect;
+use either \\[customize] or the function `menu-bar-mode'."
+  :set (lambda (symbol value)
+        (menu-bar-mode (or value 0)))
+  :initialize 'custom-initialize-default
+  :type 'boolean
+  :group 'frames)
 
 (defun menu-bar-mode (flag)
   "Toggle display of a menu bar on each frame.