aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/autoinsert.el
diff options
context:
space:
mode:
authorMattias EngdegÄrd2020-06-22 13:07:37 +0200
committerMattias EngdegÄrd2020-06-22 13:07:37 +0200
commit8ef84632c24192a71cec89a859b064925ed5aca2 (patch)
tree9eb4d5e2094d40aef1d7f5a57f791dc4d7736bef /lisp/autoinsert.el
parent62426057310b2332037a26e6f70cd5cc8b2e3a11 (diff)
downloademacs-8ef84632c24192a71cec89a859b064925ed5aca2.tar.gz
emacs-8ef84632c24192a71cec89a859b064925ed5aca2.zip
Accept lexical lambda in auto-insert-alist
This bug was exposed by a previous removal of quoting around lambda expressions in autoinsert-tests.el (1ecd350f38ee), which caused some of those tests to fail. * lisp/autoinsert.el (auto-insert): Cope with lexical closures.
Diffstat (limited to 'lisp/autoinsert.el')
-rw-r--r--lisp/autoinsert.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/autoinsert.el b/lisp/autoinsert.el
index 25961d41089..4af3d631a2c 100644
--- a/lisp/autoinsert.el
+++ b/lisp/autoinsert.el
@@ -396,7 +396,7 @@ Matches the visited file name against the elements of `auto-insert-alist'."
396 ;; which might ask the user for something 396 ;; which might ask the user for something
397 (switch-to-buffer (current-buffer)) 397 (switch-to-buffer (current-buffer))
398 (if (and (consp action) 398 (if (and (consp action)
399 (not (eq (car action) 'lambda))) 399 (not (functionp action)))
400 (skeleton-insert action) 400 (skeleton-insert action)
401 (funcall action))))) 401 (funcall action)))))
402 (if (vectorp action) 402 (if (vectorp action)