mirror of
https://git.notmuchmail.org/git/notmuch
synced 2024-11-21 18:38:08 +01:00
test: Tests for reply from alternate addresses in emacs
Since the recent reply changes were pushed, there has been a bug that causes emacs to always reply from the primary address, even if the JSON or default CLI reply output uses an alternate address. This adds two tests to the emacs test library based on the two "Reply form..." tests in the reply test library. One is currently marked broken.
This commit is contained in:
parent
f162b19148
commit
b45b72aa14
1 changed files with 44 additions and 0 deletions
44
test/emacs
44
test/emacs
|
@ -285,6 +285,50 @@ Notmuch Test Suite <test_suite@notmuchmail.org> writes:
|
||||||
EOF
|
EOF
|
||||||
test_expect_equal_file OUTPUT EXPECTED
|
test_expect_equal_file OUTPUT EXPECTED
|
||||||
|
|
||||||
|
test_begin_subtest "Reply from alternate address within emacs"
|
||||||
|
test_subtest_known_broken
|
||||||
|
add_message '[from]="Sender <sender@example.com>"' \
|
||||||
|
[to]=test_suite_other@notmuchmail.org
|
||||||
|
|
||||||
|
test_emacs "(notmuch-search \"id:\\\"${gen_msg_id}\\\"\")
|
||||||
|
(notmuch-test-wait)
|
||||||
|
(notmuch-search-reply-to-thread)
|
||||||
|
(test-output)"
|
||||||
|
cat <<EOF >EXPECTED
|
||||||
|
From: Notmuch Test Suite <test_suite_other@notmuchmail.org>
|
||||||
|
To: Sender <sender@example.com>
|
||||||
|
Subject: Re: ${test_subtest_name}
|
||||||
|
In-Reply-To: <${gen_msg_id}>
|
||||||
|
Fcc: ${MAIL_DIR}/sent
|
||||||
|
--text follows this line--
|
||||||
|
Sender <sender@example.com> writes:
|
||||||
|
|
||||||
|
> This is just a test message (#${gen_msg_cnt})
|
||||||
|
EOF
|
||||||
|
test_expect_equal_file OUTPUT EXPECTED
|
||||||
|
|
||||||
|
test_begin_subtest "Reply from address in named group list within emacs"
|
||||||
|
add_message '[from]="Sender <sender@example.com>"' \
|
||||||
|
'[to]=group:test_suite@notmuchmail.org,someone@example.com\;' \
|
||||||
|
[cc]=test_suite_other@notmuchmail.org
|
||||||
|
|
||||||
|
test_emacs "(notmuch-search \"id:\\\"${gen_msg_id}\\\"\")
|
||||||
|
(notmuch-test-wait)
|
||||||
|
(notmuch-search-reply-to-thread)
|
||||||
|
(test-output)"
|
||||||
|
cat <<EOF >EXPECTED
|
||||||
|
From: Notmuch Test Suite <test_suite@notmuchmail.org>
|
||||||
|
To: Sender <sender@example.com>, someone@example.com
|
||||||
|
Subject: Re: ${test_subtest_name}
|
||||||
|
In-Reply-To: <${gen_msg_id}>
|
||||||
|
Fcc: ${MAIL_DIR}/sent
|
||||||
|
--text follows this line--
|
||||||
|
Sender <sender@example.com> writes:
|
||||||
|
|
||||||
|
> This is just a test message (#${gen_msg_cnt})
|
||||||
|
EOF
|
||||||
|
test_expect_equal_file OUTPUT EXPECTED
|
||||||
|
|
||||||
test_begin_subtest "Reply within emacs to a multipart/mixed message"
|
test_begin_subtest "Reply within emacs to a multipart/mixed message"
|
||||||
test_emacs '(notmuch-show "id:20091118002059.067214ed@hikari")
|
test_emacs '(notmuch-show "id:20091118002059.067214ed@hikari")
|
||||||
(notmuch-show-reply)
|
(notmuch-show-reply)
|
||||||
|
|
Loading…
Reference in a new issue