Don't try to make menu bindings when window-system==nil.

1994-10-24 14:18:32 +00:00
parent 0122281ab9
commit 2db6c9ecda
1 changed files with 1 additions and 1 deletions
--- a/lisp/enriched.el
+++ b/lisp/enriched.el
@@ -558,7 +558,7 @@ Commands:
 (define-key enriched-mode-map "\M-j" 'enriched-justification-menu-map)

 ;;; These extend the "Face" menu.
-(let ((menu (car (where-is-internal facemenu-menu))))
+(let ((menu (and window-system (car (where-is-internal facemenu-menu)))))
  (if (null menu)
      nil
    (define-key enriched-mode-map