diff options
| -rw-r--r-- | lisp/autoinsert.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/autoinsert.el b/lisp/autoinsert.el index 5cf87b40b61..ae6e9863097 100644 --- a/lisp/autoinsert.el +++ b/lisp/autoinsert.el | |||
| @@ -136,7 +136,7 @@ If this contains a %s, that will be replaced by the matching rule." | |||
| 136 | "Short description: " | 136 | "Short description: " |
| 137 | ";;; " (file-name-nondirectory (buffer-file-name)) " --- " str " | 137 | ";;; " (file-name-nondirectory (buffer-file-name)) " --- " str " |
| 138 | 138 | ||
| 139 | ;; Copyright (C) " (substring (current-time-string) -4) " " | 139 | ;; Copyright (C) " (substring (current-time-string) -4) " " |
| 140 | (getenv "ORGANIZATION") | "Free Software Foundation, Inc." " | 140 | (getenv "ORGANIZATION") | "Free Software Foundation, Inc." " |
| 141 | 141 | ||
| 142 | ;; Author: " (user-full-name) | 142 | ;; Author: " (user-full-name) |
| @@ -181,7 +181,7 @@ If this contains a %s, that will be replaced by the matching rule." | |||
| 181 | \(provide '" | 181 | \(provide '" |
| 182 | (file-name-sans-extension (file-name-nondirectory (buffer-file-name))) | 182 | (file-name-sans-extension (file-name-nondirectory (buffer-file-name))) |
| 183 | ") | 183 | ") |
| 184 | ;;; " (file-name-nondirectory (buffer-file-name)) " ends here")) | 184 | ;;; " (file-name-nondirectory (buffer-file-name)) " ends here\n")) |
| 185 | "A list specifying text to insert by default into a new file. | 185 | "A list specifying text to insert by default into a new file. |
| 186 | Elements look like (CONDITION . ACTION) or ((CONDITION . DESCRIPTION) . ACTION). | 186 | Elements look like (CONDITION . ACTION) or ((CONDITION . DESCRIPTION) . ACTION). |
| 187 | CONDITION maybe a regexp that must match the new file's name, or it may be | 187 | CONDITION maybe a regexp that must match the new file's name, or it may be |