;ELC   
;;; compiled by kwzh@hal.gnu.ai.mit.edu on Tue May  2 20:13:14 1995
;;; from file /gd/gnu/emacs/19.0/lisp/autoinsert.el
;;; emacs version 19.28.90.69.
;;; bytecomp version FSF 2.10
;;; optimization is on.
;;; this file uses opcodes which do not exist in Emacs 18.

(if (and (boundp 'emacs-version)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19")))
    (error "`/gd/gnu/emacs/19.0/lisp/autoinsert.el' was compiled for Emacs 19"))


#@239 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-alist (quote (("\\.tex$" . "tex-insert.tex") ("\\.c$" . "c-insert.c") ("\\.h$" . "h-insert.c") ("\\.cc$" . "c-insert.cc") ("\\.C$" . "c-insert.cc") ("\\.H$" . "h-insert.cc") ("[Mm]akefile" . "makefile.inc") ("\\.bib$" . "tex-insert.tex"))) (#$ . 490))
#@54 *Directory from which auto-inserted files are taken.
(defvar auto-insert-directory "~/insert/" (#$ . -1006))
#@117 Insert default contents into a new file.
Matches the visited file name against the elements of `auto-insert-alist'.
(defalias 'insert-auto-insert-files #[nil "Á\n!ÃÈ=	\f„3 ƒ3 Ê@@\"ƒ+ @A‰‚ A‚ )\f…Z \fP\fÍ\f!ƒP Î\f!ˆÏÃ!‚Y ÐÑ\f\"ˆÒÓ!)+‡" [auto-insert-alist file-name-sans-versions buffer-file-name nil insert-file name alist system-type vax-vms case-fold-search 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 (#$ . 1122)])
(byte-code "À	BÀ‡" [insert-auto-insert-files find-file-not-found-hooks] 2)