[Emacs-diffs] Changes to emacs/lisp/emulation/viper-init.el

[Michael Kifer]

Index: emacs/lisp/emulation/viper-init.el
diff -u emacs/lisp/emulation/viper-init.el:1.37 
emacs/lisp/emulation/viper-init.el:1.38
--- emacs/lisp/emulation/viper-init.el:1.37     Mon Feb  6 11:37:05 2006
+++ emacs/lisp/emulation/viper-init.el  Sun Feb 19 03:16:44 2006
@@ -434,6 +434,13 @@
 (if (fboundp 'make-variable-frame-local)
     (make-variable-frame-local 'viper-insert-state-cursor-color))
 
+(defcustom viper-emacs-state-cursor-color "Magenta"
+  "Cursor color when Viper is in emacs state."
+  :type 'string
+  :group 'viper)
+(if (fboundp 'make-variable-frame-local)
+    (make-variable-frame-local 'viper-emacs-state-cursor-color))
+
 ;; internal var, used to remember the default cursor color of emacs frames
 (defvar viper-vi-state-cursor-color nil)
 (if (fboundp 'make-variable-frame-local)