Mercurial > emacs

diff lisp/emulation/viper-util.el @ 16329:08514f491f33

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(vip-window-display-p): Don't treat MS-DOS as a windowed display.
author Richard M. Stallman <rms@gnu.org>
date Wed, 25 Sep 1996 07:45:15 +0000
parents b2fae8abc5b0
children beb94a5271e2
line wrap: on
line diff
--- a/lisp/emulation/viper-util.el	Wed Sep 25 07:20:19 1996 +0000
+++ b/lisp/emulation/viper-util.el	Wed Sep 25 07:45:15 1996 +0000
@@ -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.")