From 5ae960fc192ca1a13469986b567abf98901103de Mon Sep 17 00:00:00 2001
From: Austin Clements <amdragon@MIT.EDU>
Date: Mon, 26 Mar 2012 21:37:15 -0400
Subject: [PATCH] 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.
---
test/emacs | 12 ++++++++++++
1 file changed, 12 insertions(+)
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' \
--
2.45.2