emacs-31 7746db313a6: CC Mode: Fix erroneous type: arguments to two defcustoms.
Eli Zaretskii <[email protected]> Fri, 3 Jul 2026 02:45:44 -0400 (EDT)
| Newsgroups | gmane.emacs.diffs |
|---|---|
| Message-ID | <[email protected]> |
branch: emacs-31 commit 7746db313a61ed8809cf2be748da40c4ca6ca103 Author: Alan Mackenzie <[email protected]> Commit: Eli Zaretskii <[email protected]> CC Mode: Fix erroneous type: arguments to two defcustoms. This allows customize to set the variables directly to regular expressions as an alternative to a list of identifiers. It fixes bug#81339. * lisp/progmodes/cc-vars.el (c-noise-macro-with-parens-names) (c-noise-macro-names): Correct the type: arguments to defcustom to two `choice' constructs. --- lisp/progmodes/cc-vars.el | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/progmodes/cc-vars.el b/lisp/progmodes/cc-vars.el index 4ac18869400..cfdbd73f20a 100644 --- a/lisp/progmodes/cc-vars.el +++ b/lisp/progmodes/cc-vars.el @@ -1737,7 +1737,9 @@ If you change this variable's value, call the function `c-make-noise-macro-regexps' to set the necessary internal variables (or do this implicitly by reinitializing C/C++/Objc Mode on any buffer)." :version "26.1" - :type '(repeat :tag "List of names" string) + :type '(choice + (repeat :tag "List of names (possibly empty)" string) + (regexp :tag "Names regexp")) :group 'c) (put 'c-noise-macro-names 'safe-local-variable #'c-string-list-p) (make-variable-buffer-local 'c-noise-macro-names) @@ -1754,7 +1756,9 @@ If you change this variable's value, call the function `c-make-noise-macro-regexps' to set the necessary internal variables (or do this implicitly by reinitializing C/C++/Objc Mode on any buffer)." :version "26.1" - :type '(repeat :tag "List of names (possibly empty)" string) + :type '(choice + (repeat :tag "List of names (possibly empty)" string) + (regexp :tag "Names regexp")) :group 'c) (put 'c-noise-macro-with-parens-names 'safe-local-variable #'c-string-list-p) (make-variable-buffer-local 'c-noise-macro-with-parens-names)