Mercurial > emacs
changeset 81053:469db45b9f02
(auto-insert-alist): Quote elisp sample code so as not
to confuse outline-minor-mode.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Wed, 23 May 2007 17:29:28 +0000 |
| parents | 23923b3cada1 |
| children | 0ad937cd3766 |
| files | lisp/ChangeLog lisp/autoinsert.el |
| diffstat | 2 files changed, 21 insertions(+), 16 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed May 23 17:28:25 2007 +0000 +++ b/lisp/ChangeLog Wed May 23 17:29:28 2007 +0000 @@ -1,3 +1,8 @@ +2007-05-23 Stefan Monnier <monnier@iro.umontreal.ca> + + * autoinsert.el (auto-insert-alist): Quote elisp sample code so as not + to confuse outline-minor-mode. + 2007-05-23 Eli Zaretskii <eliz@gnu.org> * tar-mode.el (tar-file-name-handler): New function.
--- a/lisp/autoinsert.el Wed May 23 17:28:25 2007 +0000 +++ b/lisp/autoinsert.el Wed May 23 17:29:28 2007 +0000 @@ -186,33 +186,33 @@ (completing-read "Keyword, C-h: " v1 nil t)) str ", ") & -2 " -;; This file is free software; you can redistribute it and/or modify -;; it under the terms of the GNU General Public License as published by -;; the Free Software Foundation; either version 2, or (at your option) -;; any later version. +\;; This file is free software; you can redistribute it and/or modify +\;; it under the terms of the GNU General Public License as published by +\;; the Free Software Foundation; either version 2, or (at your option) +\;; any later version. -;; This file is distributed in the hope that it will be useful, -;; but WITHOUT ANY WARRANTY; without even the implied warranty of -;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -;; GNU General Public License for more details. +\;; This file is distributed in the hope that it will be useful, +\;; but WITHOUT ANY WARRANTY; without even the implied warranty of +\;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +\;; GNU General Public License for more details. -;; You should have received a copy of the GNU General Public License -;; along with GNU Emacs; see the file COPYING. If not, write to -;; the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, -;; Boston, MA 02110-1301, USA. +\;; You should have received a copy of the GNU General Public License +\;; along with GNU Emacs; see the file COPYING. If not, write to +\;; the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, +\;; Boston, MA 02110-1301, USA. -;;; Commentary: +\;;; Commentary: -;; " _ " +\;; " _ " -;;; Code: +\;;; Code: \(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")) "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