2016-11-13 15:08:48 +01:00
|
|
|
#!/usr/bin/env bash
|
|
|
|
test_description="Emacs Draft Handling"
|
2017-09-25 22:38:19 +02:00
|
|
|
. $(dirname "$0")/test-lib.sh || exit 1
|
2021-05-15 22:47:44 +02:00
|
|
|
. $(dirname "$0")/test-lib-emacs.sh || exit 1
|
2016-11-13 15:08:48 +01:00
|
|
|
|
2021-05-15 22:47:44 +02:00
|
|
|
test_require_emacs
|
2016-11-13 15:08:48 +01:00
|
|
|
add_email_corpus
|
|
|
|
|
|
|
|
notmuch config set search.exclude_tags deleted
|
|
|
|
|
|
|
|
test_begin_subtest "Saving a draft indexes it"
|
|
|
|
test_emacs '(notmuch-mua-mail)
|
|
|
|
(message-goto-subject)
|
|
|
|
(insert "draft-test-0001")
|
|
|
|
(notmuch-draft-save)
|
|
|
|
(test-output)'
|
|
|
|
count1=$(notmuch count tag:draft)
|
|
|
|
count2=$(notmuch count subject:draft-test-0001)
|
|
|
|
test_expect_equal "$count1=$count2" "1=1"
|
|
|
|
|
|
|
|
test_begin_subtest "Saving a draft tags previous draft as deleted"
|
|
|
|
test_emacs '(notmuch-mua-mail)
|
|
|
|
(message-goto-subject)
|
|
|
|
(insert "draft-test-0002")
|
|
|
|
(notmuch-draft-save)
|
|
|
|
(notmuch-draft-save)
|
|
|
|
(test-output)'
|
|
|
|
count1=$(notmuch count tag:draft)
|
|
|
|
count2=$(notmuch count subject:draft-test-0002)
|
|
|
|
|
|
|
|
test_expect_equal "$count1,$count2" "2,1"
|
|
|
|
|
|
|
|
test_begin_subtest "Saving a signed draft adds header"
|
|
|
|
test_emacs '(notmuch-mua-mail)
|
|
|
|
(message-goto-subject)
|
|
|
|
(insert "draft-test-0003")
|
2016-11-14 14:49:28 +01:00
|
|
|
;; We would use (mml-secure-message-sign) but on emacs23
|
|
|
|
;; that only signs the part, not the whole message.
|
|
|
|
(mml-secure-message mml-secure-method '\''sign)
|
2016-11-13 15:08:48 +01:00
|
|
|
(notmuch-draft-save)
|
|
|
|
(test-output)'
|
|
|
|
header_count=$(notmuch show --format=raw subject:draft-test-0003 | grep -c ^X-Notmuch-Emacs-Secure)
|
|
|
|
body_count=$(notmuch notmuch show --format=raw subject:draft-test-0003 | grep -c '^\<#secure')
|
|
|
|
test_expect_equal "$header_count,$body_count" "1,0"
|
|
|
|
|
2016-11-13 15:08:49 +01:00
|
|
|
test_begin_subtest "Refusing to save an encrypted draft"
|
|
|
|
test_emacs '(notmuch-mua-mail)
|
|
|
|
(message-goto-subject)
|
|
|
|
(insert "draft-test-0004")
|
|
|
|
(mml-secure-message-sign-encrypt)
|
|
|
|
(let ((notmuch-draft-save-plaintext nil))
|
|
|
|
(notmuch-draft-save))
|
|
|
|
(test-output)'
|
|
|
|
count1=$(notmuch count tag:draft)
|
|
|
|
count2=$(notmuch count subject:draft-test-0004)
|
|
|
|
|
|
|
|
test_expect_equal "$count1,$count2" "3,0"
|
|
|
|
|
2016-11-13 15:08:50 +01:00
|
|
|
test_begin_subtest "Resuming a signed draft"
|
|
|
|
|
|
|
|
test_emacs '(notmuch-show "subject:draft-test-0003")
|
|
|
|
(notmuch-show-resume-message)
|
|
|
|
(test-output)'
|
|
|
|
notmuch_dir_sanitize OUTPUT > OUTPUT.clean
|
|
|
|
cat <<EOF | notmuch_dir_sanitize >EXPECTED
|
|
|
|
From: Notmuch Test Suite <test_suite@notmuchmail.org>
|
|
|
|
To:
|
|
|
|
Subject: draft-test-0003
|
|
|
|
Fcc: MAIL_DIR/sent
|
|
|
|
--text follows this line--
|
|
|
|
<#secure method=pgpmime mode=sign>
|
|
|
|
EOF
|
|
|
|
test_expect_equal_file EXPECTED OUTPUT.clean
|
2016-11-13 15:08:48 +01:00
|
|
|
test_done
|