diff options
| -rw-r--r-- | lisp/menu-bar.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index 214b67a89a5..7494867bfa8 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el | |||
| @@ -200,11 +200,11 @@ and selects that window." | |||
| 200 | (defvar menu-bar-mode nil) | 200 | (defvar menu-bar-mode nil) |
| 201 | 201 | ||
| 202 | (defun menu-bar-mode (flag) | 202 | (defun menu-bar-mode (flag) |
| 203 | "Toggle display of vertical scroll bars on each frame. | 203 | "Toggle display of a menu bar on each frame. |
| 204 | This command applies to all frames that exist and frames to be | 204 | This command applies to all frames that exist and frames to be |
| 205 | created in the future. | 205 | created in the future. |
| 206 | With a numeric argument, if the argument is negative, | 206 | With a numeric argument, if the argument is negative, |
| 207 | turn off scroll bars; otherwise, turn on scroll bars." | 207 | turn off menu bars; otherwise, turn on menu bars." |
| 208 | (interactive "P") | 208 | (interactive "P") |
| 209 | (setq menu-bar-mode (if (null flag) (not menu-bar-mode) | 209 | (setq menu-bar-mode (if (null flag) (not menu-bar-mode) |
| 210 | (or (not (numberp flag)) (>= flag 0)))) | 210 | (or (not (numberp flag)) (>= flag 0)))) |