diff options
| -rw-r--r-- | lisp/emulation/viper-util.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/emulation/viper-util.el b/lisp/emulation/viper-util.el index 5e533e5f545..0f3b8916095 100644 --- a/lisp/emulation/viper-util.el +++ b/lisp/emulation/viper-util.el | |||
| @@ -100,10 +100,9 @@ | |||
| 100 | (fset 'viper-int-to-char (symbol-function 'identity)) | 100 | (fset 'viper-int-to-char (symbol-function 'identity)) |
| 101 | (if (viper-window-display-p) | 101 | (if (viper-window-display-p) |
| 102 | (fset 'viper-iconify (symbol-function 'iconify-or-deiconify-frame))) | 102 | (fset 'viper-iconify (symbol-function 'iconify-or-deiconify-frame))) |
| 103 | (cond ((viper-has-face-support-p) | 103 | (fset 'viper-get-face (symbol-function 'internal-get-face)) |
| 104 | (fset 'viper-get-face (symbol-function 'internal-get-face)) | 104 | (fset 'viper-color-defined-p (symbol-function 'x-color-defined-p)) |
| 105 | (fset 'viper-color-defined-p (symbol-function 'x-color-defined-p)) | 105 | ) |
| 106 | ))) | ||
| 107 | ) | 106 | ) |
| 108 | 107 | ||
| 109 | 108 | ||