diff options
| author | Boris Goldowsky | 1994-10-24 14:18:32 +0000 |
|---|---|---|
| committer | Boris Goldowsky | 1994-10-24 14:18:32 +0000 |
| commit | 2db6c9ecda59dc0cdd3a1fda6618c100c6b15ff2 (patch) | |
| tree | d73067c8cf9e541e625d7ff82465234a22ed1650 | |
| parent | 0122281ab966d187b974732b905375e0861b84c3 (diff) | |
| download | emacs-2db6c9ecda59dc0cdd3a1fda6618c100c6b15ff2.tar.gz emacs-2db6c9ecda59dc0cdd3a1fda6618c100c6b15ff2.zip | |
Don't try to make menu bindings when window-system==nil.
| -rw-r--r-- | lisp/enriched.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/enriched.el b/lisp/enriched.el index 3249d1ded6e..8a4d32501f2 100644 --- a/lisp/enriched.el +++ b/lisp/enriched.el | |||
| @@ -558,7 +558,7 @@ Commands: | |||
| 558 | (define-key enriched-mode-map "\M-j" 'enriched-justification-menu-map) | 558 | (define-key enriched-mode-map "\M-j" 'enriched-justification-menu-map) |
| 559 | 559 | ||
| 560 | ;;; These extend the "Face" menu. | 560 | ;;; These extend the "Face" menu. |
| 561 | (let ((menu (car (where-is-internal facemenu-menu)))) | 561 | (let ((menu (and window-system (car (where-is-internal facemenu-menu))))) |
| 562 | (if (null menu) | 562 | (if (null menu) |
| 563 | nil | 563 | nil |
| 564 | (define-key enriched-mode-map | 564 | (define-key enriched-mode-map |