procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(vip-ms-style-os-p, vip-vms-os-p): Moved here from viper.el.

Browse source
This commit is contained in:
Karl Heuer 1996-07-21 19:34:15 +00:00
parent e8417bb000
commit 74fb2f32db
1 changed files with 5 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/emulation/viper-util.el
View file

@ -57,6 +57,11 @@
(defun vip-window-display-p ()
(and (vip-device-type) (not (memq (vip-device-type) '(tty stream)))))
(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.")
(defvar vip-vms-os-p (memq system-type '(vax-vms axp-vms))
"Tells if Emacs is running under VMS.")
(defvar vip-force-faces nil
"If t, Viper will think that it is running on a display that supports faces.
This is provided as a temporary relief for users of face-capable displays