Skip to content

Commit

Permalink
Set comment-column variable to 0 for the tests.
Browse files Browse the repository at this point in the history
  • Loading branch information
llemaitre19 committed Mar 15, 2024
1 parent 8f3f123 commit b8a61e2
Showing 1 changed file with 5 additions and 4 deletions.
9 changes: 5 additions & 4 deletions tests/jtsx-tests.el
Original file line number Diff line number Diff line change
Expand Up @@ -25,6 +25,7 @@ Turn this buffer in MODE mode if supplied or defaults to jtsx-tsx-mode."
(with-temp-buffer
(let ((inhibit-message t)
(indent-tabs-mode nil)
(comment-column 0)
(js-indent-level indent-offset)
(typescript-ts-mode-indent-offset indent-offset))
(if mode (funcall mode) (jtsx-tsx-mode))
Expand Down Expand Up @@ -281,28 +282,28 @@ Turn this buffer in MODE mode if supplied or defaults to jtsx-tsx-mode."
(ert-deftest jtsx-test-comment-js-enclosing-jsx-at-point ()
(let ((set-point #'(lambda () (goto-char 0)))
(content "(<A></A>);")
(result "(<A></A>); // "))
(result "(<A></A>); // "))
(should (equal (comment-dwim-into-buffer content set-point #'jtsx-jsx-mode) result))
(should (equal (comment-dwim-into-buffer content set-point #'jtsx-tsx-mode) result))))

(ert-deftest jtsx-test-comment-jsx-at-point ()
(let ((set-point #'(lambda () (progn (goto-char 0) (forward-line 1))))
(content "(\n<A>\n</A>\n);")
(result "(\n<A> {/* */}\n</A>\n);"))
(result "(\n<A> {/* */}\n</A>\n);"))
(should (equal (comment-dwim-into-buffer content set-point #'jtsx-jsx-mode) result))
(should (equal (comment-dwim-into-buffer content set-point #'jtsx-tsx-mode) result))))

(ert-deftest jtsx-test-comment-jsx-at-attribute-point ()
(let ((set-point #'(lambda () (progn (goto-char 8))))
(content "(\n<A attr>\n</A>\n);")
(result "(\n<A attr> {/* */}\n</A>\n);"))
(result "(\n<A attr> {/* */}\n</A>\n);"))
(should (equal (comment-dwim-into-buffer content set-point #'jtsx-jsx-mode) result))
(should (equal (comment-dwim-into-buffer content set-point #'jtsx-tsx-mode) result))))

(ert-deftest jtsx-test-comment-jsx-attribute-at-point ()
(let ((set-point #'(lambda () (progn (goto-char 8))))
(content "(\n<A\n attr\n>\n</A>\n);")
(result "(\n<A\n attr /* */\n>\n</A>\n);"))
(result "(\n<A\n attr /* */\n>\n</A>\n);"))
(should (equal (comment-dwim-into-buffer content set-point #'jtsx-jsx-mode) result))
(should (equal (comment-dwim-into-buffer content set-point #'jtsx-tsx-mode) result))))

Expand Down

0 comments on commit b8a61e2

Please sign in to comment.