[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 5b5896132f: * lisp/progmodes/cc-langs.el (c-make-no-parens-syntax
From: |
Stefan Monnier |
Subject: |
master 5b5896132f: * lisp/progmodes/cc-langs.el (c-make-no-parens-syntax-table): Fix bug#57065 |
Date: |
Thu, 25 Aug 2022 16:59:33 -0400 (EDT) |
branch: master
commit 5b5896132f292986e89913b650d21c0b16896298
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
* lisp/progmodes/cc-langs.el (c-make-no-parens-syntax-table): Fix bug#57065
(c-lang-const c-make-mode-syntax-table) already returns a function,
so quote it to avoid double evaluation since it could fail if the
function is not self-evaluating, such as when it's a symbol or
a value of the form (closure ...).
---
lisp/progmodes/cc-langs.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/progmodes/cc-langs.el b/lisp/progmodes/cc-langs.el
index 75f1660f22..120949a5bc 100644
--- a/lisp/progmodes/cc-langs.el
+++ b/lisp/progmodes/cc-langs.el
@@ -403,7 +403,7 @@ The syntax tables aren't stored directly since they're
quite large."
t (if (c-lang-const c-recognize-<>-arglists)
`(lambda ()
;(if (c-lang-const c-recognize-<>-arglists)
- (let ((table (funcall ,(c-lang-const c-make-mode-syntax-table))))
+ (let ((table (funcall ',(c-lang-const c-make-mode-syntax-table))))
(modify-syntax-entry ?\( "." table)
(modify-syntax-entry ?\) "." table)
(modify-syntax-entry ?\[ "." table)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 5b5896132f: * lisp/progmodes/cc-langs.el (c-make-no-parens-syntax-table): Fix bug#57065,
Stefan Monnier <=