diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2022-08-25 16:59:30 -0400 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2022-08-25 16:59:30 -0400 |
commit | 5b5896132f292986e89913b650d21c0b16896298 (patch) | |
tree | 5fd5264374d19a5a123e27b95a4296a5e95e181c | |
parent | 9ba6a7c508cbaed5eeedd56e7df633b722bf86b7 (diff) | |
download | emacs-5b5896132f292986e89913b650d21c0b16896298.tar.gz |
* 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 ...).
-rw-r--r-- | lisp/progmodes/cc-langs.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/cc-langs.el b/lisp/progmodes/cc-langs.el index 75f1660f221..120949a5bc3 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) |