828 |
(defvar emerge-startup-hook) |
(defvar emerge-startup-hook) |
829 |
(add-hook 'emerge-startup-hook 'viper-change-state-to-emacs) |
(add-hook 'emerge-startup-hook 'viper-change-state-to-emacs) |
830 |
|
|
831 |
|
;; Zap bad bindings in flyspell-mouse-map, which prevent ESC from working |
832 |
|
;; over misspelled words (due to the overlay keymaps) |
833 |
|
(defvar flyspell-mode-hook) |
834 |
|
(add-hook 'flyspell-mode-hook |
835 |
|
'(lambda () |
836 |
|
(define-key flyspell-mouse-map viper-ESC-key nil))) |
837 |
|
|
838 |
;; Tell vc-diff to put *vc* in Vi mode |
;; Tell vc-diff to put *vc* in Vi mode |
839 |
(if (featurep 'vc) |
(if (featurep 'vc) |
840 |
(defadvice vc-diff (after viper-vc-ad activate) |
(defadvice vc-diff (after viper-vc-ad activate) |