From: Mattias Engdegård <mattiase@acm.org>
Date: Mon, 22 Jun 2020 11:07:37 +0000 (+0200)
Subject: Accept lexical lambda in auto-insert-alist
X-Git-Tag: emacs-28.0.90~7113
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8ef84632c24192a71cec89a859b064925ed5aca2;p=emacs.git

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.
---

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'."
 		     ;; 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)