summaryrefslogtreecommitdiff
path: root/lisp/emulation
diff options
context:
space:
mode:
authorMiles Bader <miles@gnu.org>2006-01-30 03:16:50 +0000
committerMiles Bader <miles@gnu.org>2006-01-30 03:16:50 +0000
commit98c414c7fd1ee8a9a86ce95ce1b353041026f1b6 (patch)
tree1df6fea7727f759857bc59616e5982738a1225ac /lisp/emulation
parent07e334eac80a163ed0a78de47940647f5652ca01 (diff)
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-27
Creator: Michael Olson <mwolson@gnu.org> Merge ERC-related Viper hacks into Viper.
Diffstat (limited to 'lisp/emulation')
-rw-r--r--lisp/emulation/viper.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/emulation/viper.el b/lisp/emulation/viper.el
index 754eff3906d..ad366135ff1 100644
--- a/lisp/emulation/viper.el
+++ b/lisp/emulation/viper.el
@@ -458,6 +458,7 @@ unless it is coming up in a wrong Viper state."
'(internal-ange-ftp-mode
comint-mode
inferior-emacs-lisp-mode
+ erc-mode
eshell-mode
shell-mode)
"*A list of major modes that should come up in Vi Insert state."
@@ -494,6 +495,8 @@ unless it is coming up in a wrong Viper state."
(gnus-summary-mode emacs-state viper-gnus-modifier-map)
(Info-mode emacs-state viper-slash-and-colon-map)
(Buffer-menu-mode emacs-state viper-slash-and-colon-map)
+ (erc-mode insert-state viper-comint-mode-modifier-map)
+ (erc-mode vi-state viper-comint-mode-modifier-map)
)
"List specifying how to modify the various major modes to enable some Viperisms.
The list has the structure: ((mode viper-state keymap) (mode viper-state
@@ -768,6 +771,7 @@ It also can't undo some Viper settings."
;; remove all hooks set by viper
(mapatoms 'viper-remove-hooks)
(remove-hook 'comint-mode-hook 'viper-comint-mode-hook)
+ (remove-hook 'erc-mode-hook 'viper-comint-mode-hook)
(remove-hook 'minibuffer-setup-hook 'viper-minibuffer-setup-sentinel)
(remove-hook 'change-major-mode-hook 'viper-major-mode-change-sentinel)
(remove-hook 'post-command-hook 'viper-minibuffer-post-command-hook)
@@ -913,6 +917,7 @@ It also can't undo some Viper settings."
;; Emacs shell, ange-ftp, and comint-based modes
(add-hook 'comint-mode-hook 'viper-comint-mode-hook) ; comint
+ (add-hook 'erc-mode-hook 'viper-comint-mode-hook) ; ERC
(add-hook 'eshell-mode-hook
(lambda () (setq viper-auto-indent nil)))