changeset 83175:257f5492d958

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
author Karoly Lorentey <lorentey@elte.hu>
date Sat, 10 Jul 2004 22:37:50 +0000
parents dbb0d508babe
children d5674d957cdc
files lisp/emulation/viper-util.el
diffstat 1 files changed, 3 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emulation/viper-util.el	Sat Jul 10 22:26:28 2004 +0000
+++ b/lisp/emulation/viper-util.el	Sat Jul 10 22:37:50 2004 +0000
@@ -100,10 +100,9 @@
    (fset 'viper-int-to-char (symbol-function 'identity))
    (if (viper-window-display-p)
        (fset 'viper-iconify (symbol-function 'iconify-or-deiconify-frame)))
-   (cond ((viper-has-face-support-p)
-	  (fset 'viper-get-face (symbol-function 'internal-get-face))
-	  (fset 'viper-color-defined-p (symbol-function 'x-color-defined-p))
-	  )))
+   (fset 'viper-get-face (symbol-function 'internal-get-face))
+   (fset 'viper-color-defined-p (symbol-function 'x-color-defined-p))
+          )
  )