summaryrefslogtreecommitdiff
path: root/lisp/emulation/viper-init.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emulation/viper-init.el')
-rw-r--r--lisp/emulation/viper-init.el10
1 files changed, 4 insertions, 6 deletions
diff --git a/lisp/emulation/viper-init.el b/lisp/emulation/viper-init.el
index 539a561bb5b..c91886e0329 100644
--- a/lisp/emulation/viper-init.el
+++ b/lisp/emulation/viper-init.el
@@ -445,12 +445,10 @@ delete the text being replaced, as in standard Vi."
(defvar viper-vi-state-cursor-color nil)
(if (fboundp 'make-variable-frame-local)
- (mapc 'make-variable-frame-local
- '(viper-replace-overlay-cursor-color
- viper-insert-state-cursor-color
- viper-emacs-state-cursor-color
- viper-vi-state-cursor-color)))
-
+ (dolist (v '(viper-replace-overlay-cursor-color
+ viper-insert-state-cursor-color viper-emacs-state-cursor-color
+ viper-vi-state-cursor-color))
+ (make-variable-frame-local v)))
(viper-deflocalvar viper-replace-overlay nil "")
(put 'viper-replace-overlay 'permanent-local t)