changeset 87195:90bd274c1784

(top-level): Use dolist rather than mapc in make-variable-frame-local call.
author Glenn Morris <rgm@gnu.org>
date Sun, 09 Dec 2007 02:16:26 +0000
parents d28ef61b6463
children 67699a8ac2dc
files lisp/emulation/viper-init.el
diffstat 1 files changed, 4 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emulation/viper-init.el	Sun Dec 09 02:15:01 2007 +0000
+++ b/lisp/emulation/viper-init.el	Sun Dec 09 02:16:26 2007 +0000
@@ -445,12 +445,10 @@
 (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)