# HG changeset patch # User Stefan Monnier # Date 1111668138 0 # Node ID e6350e6a85be4c16806339f69468304a7d1a0f79 # Parent 02ddb75f347c159dfd62fd727aea6f1bf17e0e81 find-file-hooks -> find-file-hook. diff -r 02ddb75f347c -r e6350e6a85be lisp/autoinsert.el --- a/lisp/autoinsert.el Thu Mar 24 09:22:11 2005 +0000 +++ b/lisp/autoinsert.el Thu Mar 24 12:42:18 2005 +0000 @@ -1,6 +1,7 @@ ;;; autoinsert.el --- automatic mode-dependent insertion of text into new files -;; Copyright (C) 1985, 86, 87, 94, 95, 98, 2000, 03 Free Software Foundation, Inc. +;; Copyright (C) 1985, 1986, 1987, 1994, 1995, 1998, 2000, 2003, 2005 +;; Free Software Foundation, Inc. ;; Author: Charlie Martin ;; Adapted-By: Daniel Pfeiffer @@ -33,7 +34,7 @@ ;; auto-mode-alist. ;; ;; To use: -;; (add-hook 'find-file-hooks 'auto-insert) +;; (add-hook 'find-file-hook 'auto-insert) ;; setq auto-insert-directory to an appropriate slash-terminated value ;; ;; You can also customize the variable `auto-insert-mode' to load the @@ -67,7 +68,7 @@ `auto-insert-alist'. When the insertion is marked as unmodified, you can save it with \\[write-file] RET. This variable is used when the function `auto-insert' is called, e.g. -when you do (add-hook 'find-file-hooks 'auto-insert). +when you do (add-hook 'find-file-hook 'auto-insert). With \\[auto-insert], this is always treated as if it were t." :type '(choice (const :tag "Insert if possible" t) (const :tag "Do nothing" nil) @@ -326,10 +327,10 @@ insert a template for the file depending on the mode of the buffer." :global t :group 'auto-insert (if auto-insert-mode - (add-hook 'find-file-hooks 'auto-insert) - (remove-hook 'find-file-hooks 'auto-insert))) + (add-hook 'find-file-hook 'auto-insert) + (remove-hook 'find-file-hook 'auto-insert))) (provide 'autoinsert) -;;; arch-tag: 5b6630ac-c735-43cf-b097-b78c622af909 +;; arch-tag: 5b6630ac-c735-43cf-b097-b78c622af909 ;;; autoinsert.el ends here