diff options
| author | Stefan Monnier | 2005-03-24 12:44:46 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2005-03-24 12:44:46 +0000 |
| commit | a702ffbb9956f5363315be065d4ea264ffbda744 (patch) | |
| tree | 2590ed1399f9ed52286411023385cf713ff74358 /lisp/autoinsert.el | |
| parent | 486212810f017c49c1bd3b58e8998d1378c8e628 (diff) | |
| download | emacs-a702ffbb9956f5363315be065d4ea264ffbda744.tar.gz emacs-a702ffbb9956f5363315be065d4ea264ffbda744.zip | |
find-file-hooks -> find-file-hook.
Diffstat (limited to 'lisp/autoinsert.el')
| -rw-r--r-- | lisp/autoinsert.el | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/lisp/autoinsert.el b/lisp/autoinsert.el index ea3df8efa68..27f5555bb04 100644 --- a/lisp/autoinsert.el +++ b/lisp/autoinsert.el | |||
| @@ -1,6 +1,7 @@ | |||
| 1 | ;;; autoinsert.el --- automatic mode-dependent insertion of text into new files | 1 | ;;; autoinsert.el --- automatic mode-dependent insertion of text into new files |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1985, 86, 87, 94, 95, 98, 2000, 03 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1985, 1986, 1987, 1994, 1995, 1998, 2000, 2003, 2005 |
| 4 | ;; Free Software Foundation, Inc. | ||
| 4 | 5 | ||
| 5 | ;; Author: Charlie Martin <crm@cs.duke.edu> | 6 | ;; Author: Charlie Martin <crm@cs.duke.edu> |
| 6 | ;; Adapted-By: Daniel Pfeiffer <occitan@esperanto.org> | 7 | ;; Adapted-By: Daniel Pfeiffer <occitan@esperanto.org> |
| @@ -33,7 +34,7 @@ | |||
| 33 | ;; auto-mode-alist. | 34 | ;; auto-mode-alist. |
| 34 | ;; | 35 | ;; |
| 35 | ;; To use: | 36 | ;; To use: |
| 36 | ;; (add-hook 'find-file-hooks 'auto-insert) | 37 | ;; (add-hook 'find-file-hook 'auto-insert) |
| 37 | ;; setq auto-insert-directory to an appropriate slash-terminated value | 38 | ;; setq auto-insert-directory to an appropriate slash-terminated value |
| 38 | ;; | 39 | ;; |
| 39 | ;; You can also customize the variable `auto-insert-mode' to load the | 40 | ;; You can also customize the variable `auto-insert-mode' to load the |
| @@ -67,7 +68,7 @@ Insertion is possible when something appropriate is found in | |||
| 67 | `auto-insert-alist'. When the insertion is marked as unmodified, you can | 68 | `auto-insert-alist'. When the insertion is marked as unmodified, you can |
| 68 | save it with \\[write-file] RET. | 69 | save it with \\[write-file] RET. |
| 69 | This variable is used when the function `auto-insert' is called, e.g. | 70 | This variable is used when the function `auto-insert' is called, e.g. |
| 70 | when you do (add-hook 'find-file-hooks 'auto-insert). | 71 | when you do (add-hook 'find-file-hook 'auto-insert). |
| 71 | With \\[auto-insert], this is always treated as if it were t." | 72 | With \\[auto-insert], this is always treated as if it were t." |
| 72 | :type '(choice (const :tag "Insert if possible" t) | 73 | :type '(choice (const :tag "Insert if possible" t) |
| 73 | (const :tag "Do nothing" nil) | 74 | (const :tag "Do nothing" nil) |
| @@ -326,10 +327,10 @@ When Auto-insert mode is enabled, when new files are created you can | |||
| 326 | insert a template for the file depending on the mode of the buffer." | 327 | insert a template for the file depending on the mode of the buffer." |
| 327 | :global t :group 'auto-insert | 328 | :global t :group 'auto-insert |
| 328 | (if auto-insert-mode | 329 | (if auto-insert-mode |
| 329 | (add-hook 'find-file-hooks 'auto-insert) | 330 | (add-hook 'find-file-hook 'auto-insert) |
| 330 | (remove-hook 'find-file-hooks 'auto-insert))) | 331 | (remove-hook 'find-file-hook 'auto-insert))) |
| 331 | 332 | ||
| 332 | (provide 'autoinsert) | 333 | (provide 'autoinsert) |
| 333 | 334 | ||
| 334 | ;;; arch-tag: 5b6630ac-c735-43cf-b097-b78c622af909 | 335 | ;; arch-tag: 5b6630ac-c735-43cf-b097-b78c622af909 |
| 335 | ;;; autoinsert.el ends here | 336 | ;;; autoinsert.el ends here |