mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 10:31:37 -08:00
Code Issues Projects Releases Wiki Activity

Use treesit-fontify-with-override in tree-sitter functions

Browse source 
* lisp/progmodes/js.el (js--fontify-template-string)
* lisp/progmodes/python.el (python--treesit-fontify-string): Use
treesit-fontify-with-override.
This commit is contained in:
Yuan Fu 2022-10-31 15:08:17 -07:00
parent eeeae5e9ee
commit b49250ada9
No known key found for this signature in database
GPG key ID: 56E19BC57664A442
2 changed files with 15 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/progmodes/python.el
View file

@ -1015,10 +1015,11 @@ It makes underscores and dots word constituent chars.")
"VMSError" "WindowsError"
))
(defun python--treesit-fontify-string (_beg _end node _override &rest _)
(defun python--treesit-fontify-string (_beg _end node override &rest _)
"Fontify string.
NODE is the last quote in the string. Do not fontify the initial
f for f-strings."
f for f-strings. OVERRIDE is the override flag described in
`treesit-font-lock-rules'."
(let* ((string (treesit-node-parent node))
(string-beg (treesit-node-start string))
(string-end (treesit-node-end string))
@ -1032,7 +1033,7 @@ f for f-strings."
'font-lock-string-face)))
(when (eq (char-after string-beg) ?f)
(cl-incf string-beg))
(put-text-property string-beg string-end 'face face)))
(treesit-fontify-with-override string-beg string-end face override)))
(defvar python--treesit-settings
(treesit-font-lock-rules