diff options
| author | Karoly Lorentey | 2004-07-10 22:37:50 +0000 |
|---|---|---|
| committer | Karoly Lorentey | 2004-07-10 22:37:50 +0000 |
| commit | 916aa4a70459e01d6a7a05cc9bee67cdcd98fe71 (patch) | |
| tree | dfbeeda367549fbb8609552148a00601f6f1887a | |
| parent | 1eceabe3040fd1c0a089967db3f1019dcef56cdc (diff) | |
| download | emacs-916aa4a70459e01d6a7a05cc9bee67cdcd98fe71.tar.gz emacs-916aa4a70459e01d6a7a05cc9bee67cdcd98fe71.zip | |
Prevent the previous bug from reappearing later.
* lisp/emulation/viper-util.el: Unconditionally fset viper-get-face and
viper-color-defined-p under Emacs.
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-215
| -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 | ||