summaryrefslogtreecommitdiff
path: root/lisp/autoinsert.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/autoinsert.el')
-rw-r--r--lisp/autoinsert.el5
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/autoinsert.el b/lisp/autoinsert.el
index 6d3802816de..9bb485f55dc 100644
--- a/lisp/autoinsert.el
+++ b/lisp/autoinsert.el
@@ -315,8 +315,7 @@ The document was typeset with
@printindex cp
@bye
-
-@c " (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
@@ -396,7 +395,7 @@ Matches the visited file name against the elements of `auto-insert-alist'."
;; which might ask the user for something
(switch-to-buffer (current-buffer))
(if (and (consp action)
- (not (eq (car action) 'lambda)))
+ (not (functionp action)))
(skeleton-insert action)
(funcall action)))))
(if (vectorp action)