procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Specify the matching chars for JSX open/close parenthesis

Browse source 
* lisp/progmodes/js.el (js-jsx--syntax-propertize-tag): Indicate the
matching parenthesis character (since JSX’s < and > aren’t typical
parenthesis) for the sake of packages like rainbow-delimiters which
need that information.
This commit is contained in:
Jackson Ray Hamilton 2019-06-04 08:37:36 -07:00
parent c4214e4dc1
commit ea09b9fe34
No known key found for this signature in database
GPG key ID: B4771664B476B290
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/progmodes/js.el
View file

@ -2220,7 +2220,8 @@ testing for syntax only valid as JSX."
(cond
((= (char-after) ?>)
;; Make the closing “>” a close parenthesis.
(put-text-property (point) (1+ (point)) 'syntax-table '(5))
(put-text-property (point) (1+ (point)) 'syntax-table
(eval-when-compile (string-to-syntax ")<")))
(forward-char)
(setq unambiguous t)
(throw 'stop nil))
@ -2306,7 +2307,8 @@ testing for syntax only valid as JSX."
;; Save JSXBoundaryElement’s name’s match data for font-locking.
(if name-beg (put-text-property name-beg (1+ name-beg) 'js-jsx-tag-name name-match-data))
;; Make the opening “<” an open parenthesis.
(put-text-property tag-beg (1+ tag-beg) 'syntax-table '(4))
(put-text-property tag-beg (1+ tag-beg) 'syntax-table
(eval-when-compile (string-to-syntax "(>")))
;; Prevent “out of range” errors when typing at the end of a buffer.
(setq tag-end (if (eobp) (1- (point)) (point)))
;; Mark beginning and end of tag for font-locking.