(latex-mode
;; should try to offer completing read for these
"options, RET: "
- "\\documentstyle[" str & ?\] | -1
+ "\\documentclass[" str & ?\] | -1
?{ (read-string "class: ") "}\n"
("package, %s: "
"\\usepackage[" (read-string "options, RET: ") & ?\] | -1 ?{ str "}\n")
"Short description: "
";;; " (file-name-nondirectory (buffer-file-name)) " --- " str "
-;; Copyright (C) " (substring (current-time-string) -4) " "
+;; Copyright (C) " (substring (current-time-string) -4) " "
(getenv "ORGANIZATION") | "Free Software Foundation, Inc." "
;; Author: " (user-full-name)
-;;; " (file-name-nondirectory (buffer-file-name)) " ends here"))
+\(provide '"
+ (file-name-sans-extension (file-name-nondirectory (buffer-file-name)))
+ ")
+;;; " (file-name-nondirectory (buffer-file-name)) " ends here\n"))
"A list specifying text to insert by default into a new file.
Elements look like (CONDITION . ACTION) or ((CONDITION . DESCRIPTION) . ACTION).
CONDITION maybe a regexp that must match the new file's name, or it may be
When Auto-insert mode is enabled, when new files are created you can
insert a template for the file depending on the mode of the buffer."
- nil nil nil :global t :group 'auto-insert
+ :global t :group 'auto-insert
(if auto-insert-mode
(add-hook 'find-file-hooks 'auto-insert)
(remove-hook 'find-file-hooks 'auto-insert)))