diff options
Diffstat (limited to 'lisp/emulation')
| -rw-r--r-- | lisp/emulation/viper-util.el | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/lisp/emulation/viper-util.el b/lisp/emulation/viper-util.el index e4db4701828..d5e63dd9983 100644 --- a/lisp/emulation/viper-util.el +++ b/lisp/emulation/viper-util.el | |||
| @@ -52,14 +52,6 @@ | |||
| 52 | (require 'viper-init) | 52 | (require 'viper-init) |
| 53 | 53 | ||
| 54 | 54 | ||
| 55 | ;; A fix for NeXT Step | ||
| 56 | ;; Should go away, when NS people fix the design flaw, which leaves the | ||
| 57 | ;; two x-* functions undefined. | ||
| 58 | (if (and (not (fboundp 'x-display-color-p)) (fboundp 'ns-display-color-p)) | ||
| 59 | (fset 'x-display-color-p (symbol-function 'ns-display-color-p))) | ||
| 60 | (if (and (not (fboundp 'x-color-defined-p)) (fboundp 'ns-color-defined-p)) | ||
| 61 | (fset 'x-color-defined-p (symbol-function 'ns-color-defined-p))) | ||
| 62 | |||
| 63 | 55 | ||
| 64 | (defalias 'viper-overlay-p | 56 | (defalias 'viper-overlay-p |
| 65 | (if (featurep 'xemacs) 'extentp 'overlayp)) | 57 | (if (featurep 'xemacs) 'extentp 'overlayp)) |