@@ -2057,18 +2057,6 @@ Should not cause an infinite loop."
20572057 (should (string-equal (buffer-string) "* foo\n* bar\n * baz\n\n"))
20582058 (should (eq (point) 22)))))
20592059
2060- (ert-deftest test-markdown-indentation/indent-checkbox-list ()
2061- "Test `markdown-indent-line' with a list item with checkbox."
2062- (let ((markdown-indent-on-enter 'indent-and-new-item))
2063- (markdown-test-string " * [x] item 1"
2064- (end-of-line)
2065- (call-interactively #'markdown-enter-key)
2066- (should (string-equal (buffer-string) " * [x] item 1\n * [ ] "))
2067- (should (eq (point) 24))
2068- (call-interactively #'markdown-enter-key)
2069- (should (string-equal (buffer-string) " * [x] item 1\n\n"))
2070- (should (eq (point) 17)))))
2071-
20722060(ert-deftest test-markdown-indentation/indent-pre ()
20732061 "Test `markdown-indent-line' with a pre block."
20742062 (markdown-test-string
@@ -2112,12 +2100,16 @@ See GH-245."
21122100 (should (= (current-indentation) 0))))
21132101
21142102(ert-deftest test-markdown-indentation/continue-gfm-task-lists ()
2115- (markdown-test-string " - [X] item"
2116- (end-of-line)
2117- (let ((markdown-indent-on-enter 'indent-and-new-item))
2118- (call-interactively #'markdown-enter-key))
2119- (should (string-equal (buffer-string) " - [X] item\n - [ ] "))
2120- (should (= (point) 28))))
2103+ "Test `markdown-enter-key' with a gfm task list item."
2104+ (let ((markdown-indent-on-enter 'indent-and-new-item))
2105+ (markdown-test-string " - [X] item"
2106+ (end-of-line)
2107+ (call-interactively #'markdown-enter-key)
2108+ (should (string-equal (buffer-string) " - [X] item\n - [ ] "))
2109+ (should (= (point) 28))
2110+ (call-interactively #'markdown-enter-key)
2111+ (should (string-equal (buffer-string) " - [X] item\n\n"))
2112+ (should (= (point) 18)))))
21212113
21222114;;; Markup hiding tests:
21232115
0 commit comments