]> git.eshelyaron.com Git - emacs.git/commitdiff
Add open/close parenthesis syntax to “<” and “>” in JSX
authorJackson Ray Hamilton <jackson@jacksonrayhamilton.com>
Tue, 9 Apr 2019 03:01:13 +0000 (20:01 -0700)
committerJackson Ray Hamilton <jackson@jacksonrayhamilton.com>
Tue, 9 Apr 2019 05:48:25 +0000 (22:48 -0700)
* lisp/progmodes/js.el (js-jsx--syntax-propertize-tag): Like in
sgml-mode, treat “<” and “>” like open/close parenthesis, making the
text more navigable via forward-sexp, etc.

lisp/progmodes/js.el

index 9185371b523a7a96f3e28a543d7e2e2cd8a09502..1cec41d927070717efe7a179df6594126fc230a8 100644 (file)
@@ -2099,6 +2099,8 @@ testing for syntax only valid as JSX."
                          (< (point) end)))
         (cond
          ((= (char-after) ?>)
+          ;; Make the closing “>” a close parenthesis.
+          (put-text-property (point) (1+ (point)) 'syntax-table '(5))
           (forward-char)
           (setq unambiguous t)
           (throw 'stop nil))
@@ -2183,6 +2185,8 @@ testing for syntax only valid as JSX."
     (when unambiguous
       ;; 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))
       ;; 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.