Function: viper-restore-cursor-color

viper-restore-cursor-color is a byte-compiled function defined in viper-util.el.gz.

Signature

(viper-restore-cursor-color AFTER-WHICH-MODE)

Source Code

;; Defined in /usr/src/emacs/lisp/emulation/viper-util.el.gz
;; restore cursor color from replace overlay
(defun viper-restore-cursor-color(after-which-mode)
  (if (overlayp viper-replace-overlay)
      (viper-change-cursor-color
       (cond ((eq after-which-mode 'after-replace-mode)
	      (viper-get-saved-cursor-color-in-replace-mode))
	     ((eq after-which-mode 'after-emacs-mode)
	      (viper-get-saved-cursor-color-in-emacs-mode))
	     (t (viper-get-saved-cursor-color-in-insert-mode)))
       )))