Mercurial > emacs
changeset 7509:dd0db01bc9f4
(precompute-menubar-bindings): Don't precompute menus if not using x.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 16 May 1994 04:49:23 +0000 |
| parents | a15923bc982d |
| children | 9f361177d70c |
| files | lisp/startup.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/startup.el Sun May 15 21:39:38 1994 +0000 +++ b/lisp/startup.el Mon May 16 04:49:23 1994 +0000 @@ -185,7 +185,7 @@ ;; Precompute the keyboard equivalents in the menu bar items. (defun precompute-menubar-bindings () - (if (fboundp 'x-popup-menu) + (if (eq window-system 'x) (let ((submap (lookup-key global-map [menu-bar]))) (while submap (and (consp (car submap))