[PATCH v4 1/2] test: add tests for quoting of MML tags in replies

diff --git a/9d/69bca076e7a1abcdc1628143c3757bee70e5d8 b/9d/69bca076e7a1abcdc1628143c3757bee70e5d8
new file mode 100644 (file)
index 0000000..e0a0fdd
--- /dev/null
+++ b/9d/69bca076e7a1abcdc1628143c3757bee70e5d8
@@ -0,0 +1,101 @@
+Return-Path: <bremner@tethera.net>\r
+X-Original-To: notmuch@notmuchmail.org\r
+Delivered-To: notmuch@notmuchmail.org\r
+Received: from localhost (localhost [127.0.0.1])\r
+       by olra.theworths.org (Postfix) with ESMTP id E4DB0431FAF\r
+       for <notmuch@notmuchmail.org>; Wed,  1 Feb 2012 20:01:55 -0800 (PST)\r
+X-Virus-Scanned: Debian amavisd-new at olra.theworths.org\r
+X-Spam-Flag: NO\r
+X-Spam-Score: -2.3\r
+X-Spam-Level: \r
+X-Spam-Status: No, score=-2.3 tagged_above=-999 required=5\r
+       tests=[RCVD_IN_DNSWL_MED=-2.3] autolearn=disabled\r
+Received: from olra.theworths.org ([127.0.0.1])\r
+       by localhost (olra.theworths.org [127.0.0.1]) (amavisd-new, port 10024)\r
+       with ESMTP id P1dkmRTKLXSE for <notmuch@notmuchmail.org>;\r
+       Wed,  1 Feb 2012 20:01:55 -0800 (PST)\r
+Received: from tempo.its.unb.ca (tempo.its.unb.ca [131.202.1.21])\r
+       (using TLSv1 with cipher DHE-RSA-AES256-SHA (256/256 bits))\r
+       (No client certificate requested)\r
+       by olra.theworths.org (Postfix) with ESMTPS id 57D6D431FAE\r
+       for <notmuch@notmuchmail.org>; Wed,  1 Feb 2012 20:01:55 -0800 (PST)\r
+Received: from zancas.localnet\r
+       (fctnnbsc36w-156034071197.pppoe-dynamic.High-Speed.nb.bellaliant.net\r
+       [156.34.71.197]) (authenticated bits=0)\r
+       by tempo.its.unb.ca (8.13.8/8.13.8) with ESMTP id q1241rSd010866\r
+       (version=TLSv1/SSLv3 cipher=AES256-SHA bits=256 verify=NO);\r
+       Thu, 2 Feb 2012 00:01:53 -0400\r
+Received: from bremner by zancas.localnet with local (Exim 4.77)\r
+       (envelope-from <bremner@tethera.net>)\r
+       id 1Rsnrt-0003kz-3a; Thu, 02 Feb 2012 00:01:53 -0400\r
+From: David Bremner <david@tethera.net>\r
+To: notmuch@notmuchmail.org\r
+Subject: [PATCH v4 1/2] test: add tests for quoting of MML tags in replies\r
+Date: Thu,  2 Feb 2012 00:01:32 -0400\r
+Message-Id: <1328155293-2334-2-git-send-email-david@tethera.net>\r
+X-Mailer: git-send-email 1.7.8.3\r
+In-Reply-To: <1328155293-2334-1-git-send-email-david@tethera.net>\r
+References: <1328064581-13949-1-git-send-email-dmitry.kurochkin@gmail.com>\r
+       <1328155293-2334-1-git-send-email-david@tethera.net>\r
+X-BeenThere: notmuch@notmuchmail.org\r
+X-Mailman-Version: 2.1.13\r
+Precedence: list\r
+List-Id: "Use and development of the notmuch mail system."\r
+       <notmuch.notmuchmail.org>\r
+List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,\r
+       <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
+List-Archive: <http://notmuchmail.org/pipermail/notmuch>\r
+List-Post: <mailto:notmuch@notmuchmail.org>\r
+List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
+List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,\r
+       <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
+X-List-Received-Date: Thu, 02 Feb 2012 04:01:56 -0000\r
+\r
+From: Aaron Ecay <aaronecay@gmail.com>\r
+\r
+The test is broken at this time; the next commit will introduce a fix.\r
+---\r
+ test/emacs                                    |   12 ++++++++++++\r
+ test/emacs.expected-output/quote-mml-in-reply |    7 +++++++\r
+ 2 files changed, 19 insertions(+), 0 deletions(-)\r
+ create mode 100644 test/emacs.expected-output/quote-mml-in-reply\r
+\r
+diff --git a/test/emacs b/test/emacs\r
+index f36718e..2a2ce28 100755\r
+--- a/test/emacs\r
++++ b/test/emacs\r
+@@ -273,6 +273,18 @@ On 01 Jan 2000 12:00:00 -0000, Notmuch Test Suite <test_suite@notmuchmail.org> w\r
+ EOF\r
+ test_expect_equal_file OUTPUT EXPECTED\r
+ \r
++test_begin_subtest "Quote MML tags in reply"\r
++test_subtest_known_broken\r
++message_id='test-emacs-mml-quoting@message.id'\r
++add_message [id]="$message_id" \\r
++          "[subject]='$test_subtest_name'" \\r
++          '[body]="<#part disposition=inline>"'\r
++test_emacs "(let ((notmuch-fcc-dirs nil))\r
++            (notmuch-show \"id:$message_id\")\r
++            (notmuch-show-reply)\r
++            (test-output))"\r
++test_expect_equal_file OUTPUT "$EXPECTED/quote-mml-in-reply"\r
++\r
+ test_begin_subtest "Save attachment from within emacs using notmuch-show-save-attachments"\r
+ # save as archive to test that Emacs does not re-compress .gz\r
+ test_emacs '(let ((standard-input "\"attachment1.gz\""))\r
+diff --git a/test/emacs.expected-output/quote-mml-in-reply b/test/emacs.expected-output/quote-mml-in-reply\r
+new file mode 100644\r
+index 0000000..adec92a\r
+--- /dev/null\r
++++ b/test/emacs.expected-output/quote-mml-in-reply\r
+@@ -0,0 +1,7 @@\r
++From: Notmuch Test Suite <test_suite@notmuchmail.org>\r
++To: \r
++Subject: Re: Quote MML tags in reply\r
++In-Reply-To: <test-emacs-mml-quoting@message.id>\r
++--text follows this line--\r
++On Fri, 05 Jan 2001 15:43:57 +0000, Notmuch Test Suite <test_suite@notmuchmail.org> wrote:\r
++> <#!part disposition=inline>\r
+-- \r
+1.7.8.3\r
+\r