1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 18:41:25 -08:00

Fix Viper with simultaneous X and tty display devices. (Rep. by IRIE Tetsuya.)

* lisp/emulation/viper-init.el (viper-has-face-support-p): Acknowledge
  that Emacs has face support on ttys.

git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-214
This commit is contained in:
Karoly Lorentey 2004-07-10 22:26:28 +00:00
parent 4a933ef8f0
commit 1eceabe304
2 changed files with 2 additions and 1 deletions

View file

@ -184,6 +184,7 @@ Robert J. Chassell <bob at rattlesnake dot com>
Romain Francoise <romain at orebokech dot com>
Ami Fischman <ami at fischman dot org>
Friedrich Delgado Friedrichs <friedel at nomaden dot org>
IRIE Tetsuya <irie at t dot email dot ne dot jp>
Yoshiaki Kasahara <kasahara at nc dot kyushu-u dot ac dot jp>
Jurej Kubelka <Juraj dot Kubelka at email dot cz>
Istvan Marko <mi-mtty ar kismala dot com>

View file

@ -97,7 +97,7 @@ In all likelihood, you don't need to bother with this setting."
(defun viper-has-face-support-p ()
(cond ((viper-window-display-p))
(viper-force-faces)
(viper-emacs-p (memq (viper-device-type) '(pc)))
(viper-emacs-p (memq (viper-device-type) '(nil pc)))
(viper-xemacs-p (memq (viper-device-type) '(tty pc)))))