From f50cb7d7c4b37cd8e4bb1ffa5d3f9273c7e19e10 Mon Sep 17 00:00:00 2001 From: Yuan Fu Date: Sat, 28 Jan 2023 16:20:29 -0800 Subject: [PATCH] ; Improve docstring of c-ts-mode--indent-style-setter * lisp/progmodes/c-ts-mode.el: (c-ts-mode--indent-style-setter): Improve docstring. --- lisp/progmodes/c-ts-mode.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/progmodes/c-ts-mode.el b/lisp/progmodes/c-ts-mode.el index c6eb1afecec..26ad61c975d 100644 --- a/lisp/progmodes/c-ts-mode.el +++ b/lisp/progmodes/c-ts-mode.el @@ -93,7 +93,9 @@ :group 'c) (defun c-ts-mode--indent-style-setter (sym val) - "Custom setter for `c-ts-mode-set-style'." + "Custom setter for `c-ts-mode-set-style'. +Apart from setting the default value of SYM to VAL, also change +the value of SYM in `c-ts-mode' and `c++-ts-mode' buffers to VAL." (set-default sym val) (named-let loop ((res nil) (buffers (buffer-list))) @@ -107,6 +109,7 @@ res) (let ((buffer (car buffers))) (with-current-buffer buffer + ;; FIXME: Should we use `derived-mode-p' here? (if (or (eq major-mode 'c-ts-mode) (eq major-mode 'c++-ts-mode)) (loop (append res (list buffer)) (cdr buffers)) (loop res (cdr buffers)))))))) -- 2.39.2