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

[Michael Kifer]

Index: emacs/lisp/emulation/viper.el
diff -c emacs/lisp/emulation/viper.el:1.72 emacs/lisp/emulation/viper.el:1.73
*** emacs/lisp/emulation/viper.el:1.72  Sun Feb 10 01:46:12 2002
--- emacs/lisp/emulation/viper.el       Tue Apr 16 01:49:11 2002
***************
*** 834,839 ****
--- 834,845 ----
    (add-hook 'flyspell-mode-hook
            '(lambda ()
               (define-key flyspell-mouse-map viper-ESC-key nil)))
+   ;; if viper is started from .emacs, it might be impossible to get certain
+   ;; info about the display and windows until emacs initialization is complete
+   ;; So do it via the window-setup-hook
+   (add-hook 'window-setup-hook
+           '(lambda ()
+              (setq viper-vi-state-cursor-color (viper-get-cursor-color))))
  
    ;; Tell vc-diff to put *vc* in Vi mode
    (if (featurep 'vc)