[PATCH 5/5] Add notmuch-hello-hook. Called every time notmuch-hello buffer is updated.

Dmitry Kurochkin dmitry.kurochkin at gmail.com
Thu Jul 1 09:08:27 PDT 2010


---
 emacs/notmuch-hello.el |    9 ++++++++-
 1 files changed, 8 insertions(+), 1 deletions(-)

diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el
index f8ae332..5777e99 100644
--- a/emacs/notmuch-hello.el
+++ b/emacs/notmuch-hello.el
@@ -32,6 +32,11 @@
 (defvar notmuch-hello-search-bar-marker nil
   "The position of the search bar within the notmuch-hello buffer.")
 
+(defcustom notmuch-hello-hook nil
+  "Functions to call after populating a `notmuch-hello' buffer."
+  :group 'notmuch
+  :type 'hook)
+
 (defcustom notmuch-recent-searches-max 10
   "The number of recent searches to store and display."
   :type 'integer
@@ -508,7 +513,9 @@ Complete list of currently available key bindings:
 	  (widget-forward 1)))
 
       (unless (widget-at)
-	(notmuch-hello-goto-search)))))
+	(notmuch-hello-goto-search))))
+
+  (run-hooks 'notmuch-hello-hook))
 
 ;;;###autoload
 (defun notmuch-folder ()
-- 
1.7.1



More information about the notmuch mailing list