aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorYuan Fu2023-01-28 16:20:29 -0800
committerYuan Fu2023-01-29 00:12:56 -0800
commitf50cb7d7c4b37cd8e4bb1ffa5d3f9273c7e19e10 (patch)
tree806f193f4a7071fd65e2481b55371601e66af686
parent1c3ca3bb649b7e812a84b4a559463462d4357080 (diff)
downloademacs-f50cb7d7c4b37cd8e4bb1ffa5d3f9273c7e19e10.tar.gz
emacs-f50cb7d7c4b37cd8e4bb1ffa5d3f9273c7e19e10.zip
; Improve docstring of c-ts-mode--indent-style-setter
* lisp/progmodes/c-ts-mode.el: (c-ts-mode--indent-style-setter): Improve docstring.
-rw-r--r--lisp/progmodes/c-ts-mode.el5
1 files changed, 4 insertions, 1 deletions
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 @@
93 :group 'c) 93 :group 'c)
94 94
95(defun c-ts-mode--indent-style-setter (sym val) 95(defun c-ts-mode--indent-style-setter (sym val)
96 "Custom setter for `c-ts-mode-set-style'." 96 "Custom setter for `c-ts-mode-set-style'.
97Apart from setting the default value of SYM to VAL, also change
98the value of SYM in `c-ts-mode' and `c++-ts-mode' buffers to VAL."
97 (set-default sym val) 99 (set-default sym val)
98 (named-let loop ((res nil) 100 (named-let loop ((res nil)
99 (buffers (buffer-list))) 101 (buffers (buffer-list)))
@@ -107,6 +109,7 @@
107 res) 109 res)
108 (let ((buffer (car buffers))) 110 (let ((buffer (car buffers)))
109 (with-current-buffer buffer 111 (with-current-buffer buffer
112 ;; FIXME: Should we use `derived-mode-p' here?
110 (if (or (eq major-mode 'c-ts-mode) (eq major-mode 'c++-ts-mode)) 113 (if (or (eq major-mode 'c-ts-mode) (eq major-mode 'c++-ts-mode))
111 (loop (append res (list buffer)) (cdr buffers)) 114 (loop (append res (list buffer)) (cdr buffers))
112 (loop res (cdr buffers)))))))) 115 (loop res (cdr buffers))))))))