[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/autoinsert.el,v
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/autoinsert.el,v |
Date: |
Sat, 06 Oct 2007 01:49:53 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Glenn Morris <gm> 07/10/06 01:49:53
Index: autoinsert.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/autoinsert.el,v
retrieving revision 1.51
retrieving revision 1.52
diff -u -b -r1.51 -r1.52
--- autoinsert.el 25 Sep 2007 10:42:46 -0000 1.51
+++ autoinsert.el 6 Oct 2007 01:49:53 -0000 1.52
@@ -212,7 +212,88 @@
\(provide '"
(file-name-sans-extension (file-name-nondirectory (buffer-file-name)))
")
-\;;; " (file-name-nondirectory (buffer-file-name)) " ends here\n"))
+\;;; " (file-name-nondirectory (buffer-file-name)) " ends here\n")
+ (("\\.texi\\(nfo\\)?\\'" . "Texinfo file skeleton")
+ "Title: "
+ "\\input texinfo @c -*-texinfo-*-
address@hidden %**start of header
address@hidden "
+ (file-name-sans-extension
+ (file-name-nondirectory (buffer-file-name))) ".info\n"
+ "@settitle " str "
address@hidden %**end of header
address@hidden"
+ (setq short-description (read-string "Short description: "))
+ ".\n\n"
+ "Copyright @copyright{} " (substring (current-time-string) -4) " "
+ (getenv "ORGANIZATION") | (progn user-full-name) "
+
address@hidden
+Permission is granted to copy, distribute and/or modify this document
+under the terms of the GNU Free Documentation License, Version 1.1 or
+any later version published by the Free Software Foundation; with no
+Invariant Sections, and no Cover Texts. A copy of the license is
+included in the section entitled ``GNU Free Documentation License.''
+
+A copy of the license is also available from the Free Software
+Foundation Web site at @url{http://www.gnu.org/licenses/fdl.html}.
+
address@hidden quotation
+
+The document was typeset with
address@hidden://www.texinfo.org/, GNU Texinfo}.
+
address@hidden copying
+
address@hidden
address@hidden " str "
address@hidden " short-description "
address@hidden " (getenv "ORGANIZATION") | (progn user-full-name)
+ " <" (progn user-mail-address) ">
address@hidden
address@hidden 0pt plus 1filll
address@hidden
address@hidden titlepage
+
address@hidden Output the table of the contents at the beginning.
address@hidden
+
address@hidden
address@hidden Top
address@hidden " str "
+
address@hidden
address@hidden ifnottex
+
address@hidden Generate the nodes for this menu with `C-c C-u C-m'.
address@hidden
address@hidden menu
+
address@hidden Update all node entries with `C-c C-u C-n'.
address@hidden Insert new nodes with `C-c C-c n'.
address@hidden Chapter One
address@hidden Chapter One
+
+" _ "
+
address@hidden Copying This Manual
address@hidden Copying This Manual
+
address@hidden
+* GNU Free Documentation License:: License for copying this manual.
address@hidden menu
+
address@hidden Get fdl.texi from http://www.gnu.org/licenses/fdl.html
address@hidden fdl.texi
+
address@hidden Index
address@hidden Index
+
address@hidden cp
+
address@hidden
+
address@hidden " (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 may be a regexp that must match the new file's name, or it may be
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/autoinsert.el,v,
Glenn Morris <=