Mercurial > emacs
changeset 19863:ad407da635c4
new version
| author | Michael Kifer <kifer@cs.stonybrook.edu> |
|---|---|
| date | Thu, 11 Sep 1997 01:20:27 +0000 |
| parents | b5a6887b97d8 |
| children | 44dcf37ec345 |
| files | lisp/emulation/viper-keym.el lisp/emulation/viper.el |
| diffstat | 2 files changed, 3 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emulation/viper-keym.el Thu Sep 11 00:06:36 1997 +0000 +++ b/lisp/emulation/viper-keym.el Thu Sep 11 01:20:27 1997 +0000 @@ -452,10 +452,6 @@ (define-key viper-dired-modifier-map ":" 'viper-ex) (define-key viper-dired-modifier-map "/" 'viper-search-forward) -(defvar viper-help-modifier-map (make-sparse-keymap) - "This map modifies Help mode behavior.") -(define-key viper-help-modifier-map "q" (if viper-xemacs-p 'help-mode-quit)) - ;;; Code
--- a/lisp/emulation/viper.el Thu Sep 11 00:06:36 1997 +0000 +++ b/lisp/emulation/viper.el Thu Sep 11 01:20:27 1997 +0000 @@ -630,9 +630,10 @@ (defvar makefile-mode-hook) (add-hook 'makefile-mode-hook 'viper-mode) + ;; Help mode is now for viewing only (defvar help-mode-hook) - (add-hook 'help-mode-hook 'viper-mode) - (viper-modify-major-mode 'help-mode 'vi-state viper-help-modifier-map) + (add-hook 'help-mode-hook 'viper-change-state-to-emacs) + (viper-modify-major-mode 'help-mode 'emacs-state viper-slash-and-colon-map) (defvar awk-mode-hook) (add-hook 'awk-mode-hook 'viper-mode)