aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2007-05-23 17:29:28 +0000
committerStefan Monnier2007-05-23 17:29:28 +0000
commit31b6b8cde68588dc176d20f039f9cba00c79feba (patch)
treedf1d6e93efe685385960ed59f61c5571a5841d2f
parent12cdb1c15ab31d8784625978d45a6e2ff5c0ba0d (diff)
downloademacs-31b6b8cde68588dc176d20f039f9cba00c79feba.tar.gz
emacs-31b6b8cde68588dc176d20f039f9cba00c79feba.zip
(auto-insert-alist): Quote elisp sample code so as not
to confuse outline-minor-mode.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/autoinsert.el32
2 files changed, 21 insertions, 16 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5f8f8ef3379..c6c30bd3918 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12007-05-23 Stefan Monnier <monnier@iro.umontreal.ca>
2
3 * autoinsert.el (auto-insert-alist): Quote elisp sample code so as not
4 to confuse outline-minor-mode.
5
12007-05-23 Eli Zaretskii <eliz@gnu.org> 62007-05-23 Eli Zaretskii <eliz@gnu.org>
2 7
3 * tar-mode.el (tar-file-name-handler): New function. 8 * tar-mode.el (tar-file-name-handler): New function.
diff --git a/lisp/autoinsert.el b/lisp/autoinsert.el
index 7540ad78bcd..3f615dcfbd3 100644
--- a/lisp/autoinsert.el
+++ b/lisp/autoinsert.el
@@ -186,33 +186,33 @@ If this contains a %s, that will be replaced by the matching rule."
186 (completing-read "Keyword, C-h: " v1 nil t)) 186 (completing-read "Keyword, C-h: " v1 nil t))
187 str ", ") & -2 " 187 str ", ") & -2 "
188 188
189;; This file is free software; you can redistribute it and/or modify 189\;; This file is free software; you can redistribute it and/or modify
190;; it under the terms of the GNU General Public License as published by 190\;; it under the terms of the GNU General Public License as published by
191;; the Free Software Foundation; either version 2, or (at your option) 191\;; the Free Software Foundation; either version 2, or (at your option)
192;; any later version. 192\;; any later version.
193 193
194;; This file is distributed in the hope that it will be useful, 194\;; This file is distributed in the hope that it will be useful,
195;; but WITHOUT ANY WARRANTY; without even the implied warranty of 195\;; but WITHOUT ANY WARRANTY; without even the implied warranty of
196;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 196\;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
197;; GNU General Public License for more details. 197\;; GNU General Public License for more details.
198 198
199;; You should have received a copy of the GNU General Public License 199\;; You should have received a copy of the GNU General Public License
200;; along with GNU Emacs; see the file COPYING. If not, write to 200\;; along with GNU Emacs; see the file COPYING. If not, write to
201;; the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, 201\;; the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
202;; Boston, MA 02110-1301, USA. 202\;; Boston, MA 02110-1301, USA.
203 203
204;;; Commentary: 204\;;; Commentary:
205 205
206;; " _ " 206\;; " _ "
207 207
208;;; Code: 208\;;; Code:
209 209
210 210
211 211
212\(provide '" 212\(provide '"
213 (file-name-sans-extension (file-name-nondirectory (buffer-file-name))) 213 (file-name-sans-extension (file-name-nondirectory (buffer-file-name)))
214 ") 214 ")
215;;; " (file-name-nondirectory (buffer-file-name)) " ends here\n")) 215\;;; " (file-name-nondirectory (buffer-file-name)) " ends here\n"))
216 "A list specifying text to insert by default into a new file. 216 "A list specifying text to insert by default into a new file.
217Elements look like (CONDITION . ACTION) or ((CONDITION . DESCRIPTION) . ACTION). 217Elements look like (CONDITION . ACTION) or ((CONDITION . DESCRIPTION) . ACTION).
218CONDITION may be a regexp that must match the new file's name, or it may be 218CONDITION may be a regexp that must match the new file's name, or it may be