diff options
author | Christophe Troestler <Christophe.Troestler@umons.ac.be> | 2023-11-30 00:13:10 +0100 |
---|---|---|
committer | Dmitry Gutov <dmitry@gutov.dev> | 2023-12-02 01:55:02 +0200 |
commit | fbaf113bf38ee7db8416f0c0581d479c40b2d69c (patch) | |
tree | e06f651663abfc3019e2e332bd9ed27368dc93ac /lisp/progmodes/rust-ts-mode.el | |
parent | bd62bdbc680833bb730b114e005e41df8dc97900 (diff) | |
download | emacs-fbaf113bf38ee7db8416f0c0581d479c40b2d69c.tar.gz emacs-fbaf113bf38ee7db8416f0c0581d479c40b2d69c.tar.bz2 emacs-fbaf113bf38ee7db8416f0c0581d479c40b2d69c.zip |
rust-ts-mode: appropriately fontify doc strings
* lisp/progmodes/rust-ts-mode.el
(rust-ts-mode--comment-docstring): New function.
(rust-ts-mode--font-lock-settings): Use it
(https://lists.gnu.org/archive/html/emacs-devel/2023-12/msg00019.html).
Diffstat (limited to 'lisp/progmodes/rust-ts-mode.el')
-rw-r--r-- | lisp/progmodes/rust-ts-mode.el | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/lisp/progmodes/rust-ts-mode.el b/lisp/progmodes/rust-ts-mode.el index 999c1d7ae96..a07634199ff 100644 --- a/lisp/progmodes/rust-ts-mode.el +++ b/lisp/progmodes/rust-ts-mode.el @@ -147,7 +147,7 @@ :language 'rust :feature 'comment - '(([(block_comment) (line_comment)]) @font-lock-comment-face) + '(([(block_comment) (line_comment)]) @rust-ts-mode--comment-docstring) :language 'rust :feature 'delimiter @@ -287,6 +287,17 @@ '((ERROR) @font-lock-warning-face)) "Tree-sitter font-lock settings for `rust-ts-mode'.") +(defun rust-ts-mode--comment-docstring (node override start end &rest _args) + "Use the comment or documentation face appropriately for comments." + (let* ((beg (treesit-node-start node)) + (end (treesit-node-end node)) + (face (save-excursion + (goto-char beg) + (if (looking-at "///") + 'font-lock-doc-face + 'font-lock-comment-face)))) + (treesit-fontify-with-override beg end face override start end))) + (defun rust-ts-mode--fontify-scope (node override start end &optional tail-p) (let* ((case-fold-search nil) (face |