From 14326e6cb77fe3061dc7ea70419837c7c19c34ae Mon Sep 17 00:00:00 2001 From: David Bremner Date: Sat, 26 Jun 2021 09:04:26 -0300 Subject: [PATCH] test: start test file for emacs unthreaded view. Initial focus is on behaviour with large threads. The second test replicates a bug reported by Alan Schmitt in id:87lf7sojbq.fsf@m4x.org. --- test/T465-emacs-unthreaded.sh | 38 +++++++++++++++++++++++++++++++++++ 1 file changed, 38 insertions(+) create mode 100755 test/T465-emacs-unthreaded.sh diff --git a/test/T465-emacs-unthreaded.sh b/test/T465-emacs-unthreaded.sh new file mode 100755 index 00000000..16ff89a9 --- /dev/null +++ b/test/T465-emacs-unthreaded.sh @@ -0,0 +1,38 @@ +#!/usr/bin/env bash + +test_description="emacs unthreaded interface" +. $(dirname "$0")/test-lib.sh || exit 1 +. $NOTMUCH_SRCDIR/test/test-lib-emacs.sh || exit 1 + +test_require_emacs + +generate_message "[id]=large-thread-1" '[subject]="large thread"' +printf " 2001-01-05 Notmuch Test Suite large thread%43s(inbox unread)\n" >> EXPECTED.unthreaded + +for num in $(seq 2 64); do + prev=$((num - 1)) + generate_message '[subject]="large thread"' "[id]=large-thread-$num" "[in-reply-to]=\" + printf " 2001-01-05 Notmuch Test Suite large thread%43s(inbox unread)\n" >> EXPECTED.unthreaded +done +printf "End of search results.\n" >> EXPECTED.unthreaded + +notmuch new > new.output 2>&1 + +test_begin_subtest "large thread" +test_emacs '(let ((max-lisp-eval-depth 10)) + (notmuch-unthreaded "subject:large-thread") + (notmuch-test-wait) + (test-output))' +test_expect_equal_file EXPECTED.unthreaded OUTPUT + +test_begin_subtest "message from large thread (status)" +test_subtest_known_broken +output=$(test_emacs '(let ((max-lisp-eval-depth 10)) + (notmuch-unthreaded "subject:large-thread") + (notmuch-test-wait) + (notmuch-tree-show-message nil) + (notmuch-test-wait) + "SUCCESS")' ) +test_expect_equal "$output" '"SUCCESS"' + +test_done -- 2.43.0