X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=test%2Femacs-tree;h=4bdfddd232af020c7e893f3e2f7a61a082d6efb9;hb=d622cb942aa2db9fbadf3a16e804d36dfe71c8cb;hp=05ce85d0c16dfdebd6da8a1434c585318c6b2a94;hpb=81b2ad57f06f6b7619aae81dc2a0b79ec426ca73;p=notmuch diff --git a/test/emacs-tree b/test/emacs-tree index 05ce85d0..4bdfddd2 100755 --- a/test/emacs-tree +++ b/test/emacs-tree @@ -6,17 +6,9 @@ test_description="emacs tree view interface" EXPECTED=$TEST_DIRECTORY/tree.expected-output add_email_corpus -test_begin_subtest "Do we have emacs" -test_emacs '(insert "hello\n") - (test-output)' -cat <EXPECTED -hello -EOF -test_expect_equal_file OUTPUT EXPECTED test_begin_subtest "Basic notmuch-tree view in emacs" test_emacs '(add-to-list (quote load-path) "'$PICK_DIR'") - (require (quote notmuch-tree)) (notmuch-tree "tag:inbox") (notmuch-test-wait) (test-output) @@ -25,7 +17,6 @@ test_expect_equal_file OUTPUT $EXPECTED/notmuch-tree-tag-inbox test_begin_subtest "Refreshed notmuch-tree view in emacs" test_emacs '(add-to-list (quote load-path) "'$PICK_DIR'") - (require (quote notmuch-tree)) (notmuch-tree "tag:inbox") (notmuch-test-wait) (notmuch-tree-refresh-view) @@ -40,7 +31,6 @@ test_expect_equal_file OUTPUT $EXPECTED/notmuch-tree-tag-inbox test_begin_subtest "Tag message in notmuch tree view (display)" test_emacs '(add-to-list (quote load-path) "'$PICK_DIR'") - (require (quote notmuch-tree)) (notmuch-tree "tag:inbox") (notmuch-test-wait) (forward-line) @@ -55,7 +45,6 @@ test_expect_equal "$output" "id:877h1wv7mg.fsf@inf-8657.int-evry.fr" test_begin_subtest "Untag message in notmuch tree view" test_emacs '(add-to-list (quote load-path) "'$PICK_DIR'") - (require (quote notmuch-tree)) (notmuch-tree "tag:inbox") (notmuch-test-wait) (forward-line) @@ -70,7 +59,6 @@ test_expect_equal "$output" "" test_begin_subtest "Tag thread in notmuch tree view" test_emacs '(add-to-list (quote load-path) "'$PICK_DIR'") - (require (quote notmuch-tree)) (notmuch-tree "tag:inbox") (notmuch-test-wait) ;; move to a sizable thread @@ -93,7 +81,6 @@ id:20091117190054.GU3165@dottiness.seas.harvard.edu" test_begin_subtest "Untag thread in notmuch tree view" test_emacs '(add-to-list (quote load-path) "'$PICK_DIR'") - (require (quote notmuch-tree)) (notmuch-tree "tag:inbox") (notmuch-test-wait) ;; move to the same sizable thread as above