test: add test for `notmuch-hello-mode-hook'
authorDmitry Kurochkin <dmitry.kurochkin@gmail.com>
Sun, 18 Dec 2011 00:21:19 +0000 (04:21 +0400)
committerDavid Bremner <bremner@debian.org>
Tue, 20 Dec 2011 11:42:00 +0000 (07:42 -0400)
Test that `notmuch-hello-mode-hook' is called once when
`notmuch-hello' function is called.

test/emacs

index 6e922debc432017cae43338999bbecf7d8009a1e..a864ffa7a3856278154c3c8d393451b4a21ba96d 100755 (executable)
@@ -476,4 +476,13 @@ test_emacs "(let ((notmuch-command \"$notmuch_counter_command\"))
              (notmuch-show \"id:$id\"))"
 test_expect_equal $(notmuch_counter_value) 1
 
+test_begin_subtest "notmuch-hello-mode hook is called"
+counter=$(test_emacs \
+    '(let ((notmuch-hello-mode-hook-counter 0))
+       (kill-buffer "*notmuch-hello*")
+       (notmuch-hello)
+       notmuch-hello-mode-hook-counter)'
+)
+test_expect_equal "$counter" 1
+
 test_done