Mercurial > emacs
diff lisp/emulation/viper-init.el @ 64383:66f4633e319a
(viper-activate-input-method): Avoid warning.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 16 Jul 2005 17:39:49 +0000 |
parents | a4c59075cac8 |
children | 34bd8e434dd7 187d6a1f84f7 |
line wrap: on
line diff
--- a/lisp/emulation/viper-init.el Sat Jul 16 17:35:09 2005 +0000 +++ b/lisp/emulation/viper-init.el Sat Jul 16 17:39:49 2005 +0000 @@ -362,8 +362,8 @@ (defun viper-activate-input-method () (cond ((and viper-emacs-p (fboundp 'activate-input-method)) (activate-input-method default-input-method)) - ((and viper-xemacs-p (fboundp 'quail-mode)) - (quail-mode 1)))) + ((featurep 'xemacs) + (if (fboundp 'quail-mode) (quail-mode 1))))) ;; Set quail-mode to ARG (defun viper-set-input-method (arg)