Mercurial > emacs
comparison lisp/menu-bar.el @ 86322:b59436080a4c
(x-menu-bar-open): Declare as function.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Thu, 22 Nov 2007 13:51:09 +0000 |
parents | 2cce56fd7361 |
children | cdd30283527d 53108e6cea98 |
comparison
equal
deleted
inserted
replaced
86321:05a5763c9e23 | 86322:b59436080a4c |
---|---|
1773 (interactive (list (or current-prefix-arg 'toggle))) | 1773 (interactive (list (or current-prefix-arg 'toggle))) |
1774 (if (eq arg 'toggle) | 1774 (if (eq arg 'toggle) |
1775 (menu-bar-mode (if (> (frame-parameter nil 'menu-bar-lines) 0) 0 1)) | 1775 (menu-bar-mode (if (> (frame-parameter nil 'menu-bar-lines) 0) 0 1)) |
1776 (menu-bar-mode arg))) | 1776 (menu-bar-mode arg))) |
1777 | 1777 |
1778 (declare-function x-menu-bar-open "term/x-win" (&optional frame)) | |
1779 | |
1778 (defun menu-bar-open (&optional frame) | 1780 (defun menu-bar-open (&optional frame) |
1779 "Start key navigation of the menu bar in FRAME. | 1781 "Start key navigation of the menu bar in FRAME. |
1780 | 1782 |
1781 This function decides which method to use to access the menu | 1783 This function decides which method to use to access the menu |
1782 depending on FRAME's terminal device. On X displays, it calls | 1784 depending on FRAME's terminal device. On X displays, it calls |