;;; compiled by eric@geech.gnu.ai.mit.edu on Mon Mar 22 13:19:29 1993
;;; from file /gd/gnu/emacs/19.0/lisp/autoinsert.el
;;; emacs version 19.0.506.
;;; bytecomp version FSF 2.08
;;; optimization is on.

(defvar auto-insert-alist (quote (("\\.tex$" . "tex-insert.tex") ("\\.c$" . "c-insert.c") ("\\.h$" . "h-insert.c") ("[Mm]akefile" . "makefile.inc") ("\\.bib$" . "tex-insert.tex"))) "\
A list specifying text to insert by default into a new file.
Elements look like (REGEXP . FILENAME); if the new file's name
matches REGEXP, then the file FILENAME is inserted into the buffer.
Only the first matching element is effective.")
(defvar auto-insert-directory "~/insert/" "\
*Directory from which auto-inserted files are taken.")
(fset 'insert-auto-insert-files #[nil "Á\n!Ã„- ƒ- Ç@@\"ƒ% @A‰‚\n A‚	 …S P	Ê	!ƒI Ë	!ˆÌÃ!‚R ÍÎ	\"ˆÏÐ!)+‡" [auto-insert-alist file-name-sans-versions buffer-file-name nil insert-file name alist string-match auto-insert-directory file file-readable-p insert-file-contents set-buffer-modified-p message "Auto-insert: file %s not found" sleep-for 1] 4 "\
Insert default contents into a new file.
Matches the visited file name against the elements of `auto-insert-alist'."])
(byte-code "À	BÀ‡" [insert-auto-insert-files find-file-not-found-hooks] 2)