Mercurial > emacs
changeset 51291:304ec2e5804c
(ctl-x-map): Don't bind C-x C-i or C-x 3.
(global-map): Don't bind C-z.
(vip-setup): New function to rebind C-x 7 and C-z.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 28 May 2003 11:29:25 +0000 |
| parents | 0e0d3c3dca7f |
| children | c41cc5ded813 |
| files | lisp/emulation/vip.el |
| diffstat | 1 files changed, 5 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emulation/vip.el Wed May 28 11:27:52 2003 +0000 +++ b/lisp/emulation/vip.el Wed May 28 11:29:25 2003 +0000 @@ -293,9 +293,6 @@ (define-key vip-mode-map "~" 'vip-nil) (define-key vip-mode-map "\177" 'vip-delete-backward-char) -(define-key ctl-x-map "3" 'vip-buffer-in-two-windows) -(define-key ctl-x-map "\C-i" 'insert-file) - (defun vip-version () (interactive) (message "VIP version 3.5 of September 15, 1987")) @@ -303,7 +300,11 @@ ;; basic set up -(global-set-key "\C-z" 'vip-change-mode-to-vi) +;;;###autoload +(defun vip-setup () + "Set up bindings for C-x 7 and C-z that are useful for VIP users." + (define-key ctl-x-map "7" 'vip-buffer-in-two-windows) + (global-set-key "\C-z" 'vip-change-mode-to-vi)) (defmacro vip-loop (count body) "(COUNT BODY) Execute BODY COUNT times."