aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/emulation
diff options
context:
space:
mode:
authorStefan Monnier2005-03-24 22:17:43 +0000
committerStefan Monnier2005-03-24 22:17:43 +0000
commitffc30f4fa15b023a72bec92df6a54a74a34c094a (patch)
tree9ae48f246139da2d763a0f319e949742984b6076 /lisp/emulation
parent781da985a74078e9c9178d1fe03557de957e6333 (diff)
downloademacs-ffc30f4fa15b023a72bec92df6a54a74a34c094a.tar.gz
emacs-ffc30f4fa15b023a72bec92df6a54a74a34c094a.zip
find-file-hooks -> find-file-hook.
Diffstat (limited to 'lisp/emulation')
-rw-r--r--lisp/emulation/vi.el58
1 files changed, 29 insertions, 29 deletions
diff --git a/lisp/emulation/vi.el b/lisp/emulation/vi.el
index 4e17644e66a..70a52617431 100644
--- a/lisp/emulation/vi.el
+++ b/lisp/emulation/vi.el
@@ -1,7 +1,7 @@
1;;; vi.el --- major mode for emulating "vi" editor under GNU Emacs 1;;; vi.el --- major mode for emulating "vi" editor under GNU Emacs
2 2
3; This file is in the public domain because the authors distributed it 3;; This file is in the public domain because the authors distributed it
4; without a copyright notice before the US signed the Bern Convention. 4;; without a copyright notice before the US signed the Bern Convention.
5 5
6;; This file is part of GNU Emacs. 6;; This file is part of GNU Emacs.
7 7
@@ -11,32 +11,32 @@
11 11
12;;; Commentary: 12;;; Commentary:
13 13
14; Originally written by : seismo!wucs!nz@rsch.wisc.edu (Neal Ziring) 14;; Originally written by : seismo!wucs!nz@rsch.wisc.edu (Neal Ziring)
15; Extensively redesigned and rewritten by wu@crys.wisc.edu (Felix S.T. Wu) 15;; Extensively redesigned and rewritten by wu@crys.wisc.edu (Felix S.T. Wu)
16; Last revision: 01/07/87 Wed (for GNU Emacs 18.33) 16;; Last revision: 01/07/87 Wed (for GNU Emacs 18.33)
17 17
18; INSTALLATION PROCEDURE: 18;; INSTALLATION PROCEDURE:
19; 1) Add a global key binding for command "vi-mode" (I use ESC ESC instead of 19;; 1) Add a global key binding for command "vi-mode" (I use ESC ESC instead of
20; the single ESC used in real "vi", so I can access other ESC prefixed emacs 20;; the single ESC used in real "vi", so I can access other ESC prefixed emacs
21; commands while I'm in "vi"), say, by putting the following line in your 21;; commands while I'm in "vi"), say, by putting the following line in your
22; ".emacs" file: 22;; ".emacs" file:
23; (define-key global-map "\e\e" 'vi-mode) ;quick switch into vi-mode 23;; (define-key global-map "\e\e" 'vi-mode) ;quick switch into vi-mode
24; 2) If you wish you can define "find-file-hooks" to enter "vi" automatically 24;; 2) If you wish you can define "find-file-hook" to enter "vi" automatically
25; after a file is loaded into the buffer. For example, I defined it as: 25;; after a file is loaded into the buffer. For example, I defined it as:
26; (setq find-file-hooks (list 26;; (setq find-file-hook (list
27; (function (lambda () 27;; (function (lambda ()
28; (if (not (or (eq major-mode 'Info-mode) 28;; (if (not (or (eq major-mode 'Info-mode)
29; (eq major-mode 'vi-mode))) 29;; (eq major-mode 'vi-mode)))
30; (vi-mode)))))) 30;; (vi-mode))))))
31; 3) In your .emacs file you can define the command "vi-mode" to be "autoload" 31;; 3) In your .emacs file you can define the command "vi-mode" to be "autoload"
32; or you can execute the "load" command to load "vi" directly. 32;; or you can execute the "load" command to load "vi" directly.
33; 4) Read the comments for command "vi-mode" before you start using it. 33;; 4) Read the comments for command "vi-mode" before you start using it.
34; 34
35; COULD DO 35;; COULD DO
36; 1). A general 'define-operator' function to replace current hack 36;; 1). A general 'define-operator' function to replace current hack
37; 2). In operator handling, should allow other point moving Emacs commands 37;; 2). In operator handling, should allow other point moving Emacs commands
38; (such as ESC <, ESC >) to be used as arguments. 38;; (such as ESC <, ESC >) to be used as arguments.
39; 39
40;;; Code: 40;;; Code:
41 41
42(defvar vi-mode-old-major-mode) 42(defvar vi-mode-old-major-mode)
@@ -1487,5 +1487,5 @@ With ARG, inserts that many newlines."
1487 1487
1488(provide 'vi) 1488(provide 'vi)
1489 1489
1490;;; arch-tag: ac9bdac3-8acb-4ddd-bdae-c6dd873153b3 1490;; arch-tag: ac9bdac3-8acb-4ddd-bdae-c6dd873153b3
1491;;; vi.el ends here 1491;;; vi.el ends here