summaryrefslogtreecommitdiff
path: root/lisp/emulation
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1996-09-25 07:45:15 +0000
committerRichard M. Stallman <rms@gnu.org>1996-09-25 07:45:15 +0000
commit5cbae9ea158e9d480ba97cfe396ded73c7b552c6 (patch)
treece9972de523adabd603bab4629f7fe7b946349a9 /lisp/emulation
parent47cb96a3a0833f35e9a950b0cffda8b10fb15f74 (diff)
downloademacs-5cbae9ea158e9d480ba97cfe396ded73c7b552c6.tar.gz
(vip-window-display-p): Don't treat MS-DOS as a windowed display.
Diffstat (limited to 'lisp/emulation')
-rw-r--r--lisp/emulation/viper-util.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emulation/viper-util.el b/lisp/emulation/viper-util.el
index 09e2787ccad..70daa478bae 100644
--- a/lisp/emulation/viper-util.el
+++ b/lisp/emulation/viper-util.el
@@ -55,7 +55,7 @@
(device-type (selected-device))))
;; in XEmacs: device-type is tty on tty and stream in batch.
(defun vip-window-display-p ()
- (and (vip-device-type) (not (memq (vip-device-type) '(tty stream)))))
+ (and (vip-device-type) (not (memq (vip-device-type) '(tty stream pc)))))
(defvar vip-ms-style-os-p (memq system-type '(ms-dos windows-nt windows-95))
"Tells if Emacs is running under an MS-style OS: ms-dos, windows-nt, W95.")