From: Austin Clements <amdragon@MIT.EDU>
Date: Tue, 27 Mar 2012 01:37:15 +0000 (-0400)
Subject: test: Add Emacs test for messages with quotes in their message ID
X-Git-Tag: 0.13_rc1~112
X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=5ae960fc192ca1a13469986b567abf98901103de;p=notmuch.git

test: Add Emacs test for messages with quotes in their message ID

Currently this is broken because Emacs doesn't properly escape double
quotes in message IDs.
---

diff --git a/test/emacs b/test/emacs
index 8a287058..62eaedba 100755
--- a/test/emacs
+++ b/test/emacs
@@ -139,6 +139,18 @@ test_emacs '(notmuch-search "id:\"123..456@example\"")
 output=$(notmuch search 'id:"123..456@example"' | notmuch_search_sanitize)
 test_expect_equal "$output" "thread:XXX   2001-01-05 [1/1] Notmuch Test Suite; Message with .. in Message-Id (inbox search-add show-add)"
 
+test_begin_subtest "Message with quote in Message-Id:"
+test_subtest_known_broken
+add_message '[id]="\"quote\"@example"' '[subject]="Message with quote in Message-Id"'
+test_emacs '(notmuch-search "subject:\"Message with quote\"")
+	    (notmuch-test-wait)
+	    (execute-kbd-macro "+search-add")
+            (notmuch-search-show-thread)
+	    (notmuch-test-wait)
+	    (execute-kbd-macro "+show-add")'
+output=$(notmuch search 'id:"""quote""@example"' | notmuch_search_sanitize)
+test_expect_equal "$output" "thread:XXX   2001-01-05 [1/1] Notmuch Test Suite; Message with quote in Message-Id (inbox search-add show-add)"
+
 test_begin_subtest "Sending a message via (fake) SMTP"
 emacs_deliver_message \
     'Testing message sent via SMTP' \