test: add test for emacs notmuch-show-strip-re function

[notmuch] / test / emacs-show

diff --git a/test/emacs-show b/test/emacs-show
index 2498564f89e433328850c7e60106878a49e74566..1ddb28eb2d1ba47644c4a870ff21a4aa33d51d92 100755 (executable)
--- a/test/emacs-show
+++ b/test/emacs-show
@@ -24,4 +24,17 @@ test_emacs "(notmuch-show \"id:$message_id\")
            (test-visible-output)"
 test_expect_equal_file OUTPUT EXPECTED
 
+test_begin_subtest "Bare subject #1"
+output=$(test_emacs '(notmuch-show-strip-re "Re: subject")')
+test_expect_equal "$output" '"subject"'
+
+test_begin_subtest "Bare subject #2"
+output=$(test_emacs '(notmuch-show-strip-re "re:Re: re:  Re:  re:subject")')
+test_expect_equal "$output" '"subject"'
+
+test_begin_subtest "Bare subject #3"
+test_subtest_known_broken
+output=$(test_emacs '(notmuch-show-strip-re "the cure: fix the regexp")')
+test_expect_equal "$output" '"the cure: fix the regexp"'
+
 test_done