From 28ea16dc58b20d48975293a5179fd58bf5a4b39a Mon Sep 17 00:00:00 2001 From: Jason Blevins Date: Tue, 21 Nov 2017 10:39:38 -0500 Subject: [PATCH] Don't meddle with match-data, for testing purposes --- tests/markdown-test.el | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/tests/markdown-test.el b/tests/markdown-test.el index 6bf9175..35fac67 100644 --- a/tests/markdown-test.el +++ b/tests/markdown-test.el @@ -3916,7 +3916,7 @@ puts 'hello, world' "Test function `markdown-promote-list-item'." (markdown-test-file "nested-list.text" (forward-line) - (should (looking-at " - List level 1 item 2 + (should (looking-at-p " - List level 1 item 2 Second paragraph of item 2 @@ -3925,7 +3925,7 @@ puts 'hello, world' Another paragraph of item 2")) (markdown-demote-list-item) - (should (looking-at " - List level 1 item 2 + (should (looking-at-p " - List level 1 item 2 Second paragraph of item 2 @@ -3934,7 +3934,7 @@ puts 'hello, world' Another paragraph of item 2")) (markdown-promote-list-item) - (should (looking-at " - List level 1 item 2 + (should (looking-at-p " - List level 1 item 2 Second paragraph of item 2 @@ -3944,15 +3944,15 @@ puts 'hello, world' Another paragraph of item 2")) (goto-char (point-min)) (forward-line 22) - (should (looking-at " - List level 3 item 1 + (should (looking-at-p " - List level 3 item 1 Nested pre block")) (markdown-demote-list-item) - (should (looking-at " - List level 3 item 1 + (should (looking-at-p " - List level 3 item 1 Nested pre block")) (markdown-promote-list-item) - (should (looking-at " - List level 3 item 1 + (should (looking-at-p " - List level 3 item 1 Nested pre block")))) -- 2.11.4.GIT