diff options
| author | Richard M. Stallman | 1996-09-25 07:45:15 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-09-25 07:45:15 +0000 |
| commit | 8028cf8aadcc3be3d2cbe7b88a026d09b9e50033 (patch) | |
| tree | 4a0fbe16843bf7fe3b331d3ec143b81020e9c6a2 /lisp/emulation | |
| parent | b53ce41df657a9dce8f7740deefdc00bcd261e84 (diff) | |
| download | emacs-8028cf8aadcc3be3d2cbe7b88a026d09b9e50033.tar.gz emacs-8028cf8aadcc3be3d2cbe7b88a026d09b9e50033.zip | |
(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.el | 2 |
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 @@ | |||
| 55 | (device-type (selected-device)))) | 55 | (device-type (selected-device)))) |
| 56 | ;; in XEmacs: device-type is tty on tty and stream in batch. | 56 | ;; in XEmacs: device-type is tty on tty and stream in batch. |
| 57 | (defun vip-window-display-p () | 57 | (defun vip-window-display-p () |
| 58 | (and (vip-device-type) (not (memq (vip-device-type) '(tty stream))))) | 58 | (and (vip-device-type) (not (memq (vip-device-type) '(tty stream pc))))) |
| 59 | 59 | ||
| 60 | (defvar vip-ms-style-os-p (memq system-type '(ms-dos windows-nt windows-95)) | 60 | (defvar vip-ms-style-os-p (memq system-type '(ms-dos windows-nt windows-95)) |
| 61 | "Tells if Emacs is running under an MS-style OS: ms-dos, windows-nt, W95.") | 61 | "Tells if Emacs is running under an MS-style OS: ms-dos, windows-nt, W95.") |