From: Michal Sojka Date: Sat, 18 Feb 2012 22:12:29 +0000 (+0100) Subject: emacs-hello: Do not calculate the count of the messages in hidden sections X-Git-Tag: 0.13_rc1~162 X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=4a0740920d2a92d6a7d71ec7b8fc50e441e7552d;p=notmuch.git emacs-hello: Do not calculate the count of the messages in hidden sections The result is that hello screen shows much faster when some sections are hidden. --- diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el index aad373d6..e9caade5 100644 --- a/emacs/notmuch-hello.el +++ b/emacs/notmuch-hello.el @@ -695,16 +695,16 @@ Supports the following entries in OPTIONS as a plist: (notmuch-hello-update)) "hide")) (widget-insert "\n") - (let (target-pos - (searches (apply 'notmuch-hello-query-counts query-alist options))) - (when (and (not is-hidden) - (or (not (plist-get options :hide-if-empty)) - searches)) - (widget-insert "\n") - (setq target-pos - (notmuch-hello-insert-buttons searches)) - (indent-rigidly start (point) notmuch-hello-indent) - target-pos)))) + (let (target-pos) + (when (not is-hidden) + (let ((searches (apply 'notmuch-hello-query-counts query-alist options))) + (when (or (not (plist-get options :hide-if-empty)) + searches) + (widget-insert "\n") + (setq target-pos + (notmuch-hello-insert-buttons searches)) + (indent-rigidly start (point) notmuch-hello-indent)))) + target-pos))) (defun notmuch-hello-insert-tags-section (&optional title &rest options) "Insert a section displaying all tags with message counts.