On Sat, 18 Feb 2012 23:12:29 +0100, Michal Sojka <sojkam1 at fel.cvut.cz> wrote: > The result is that hello screen shows much faster when some sections are > hidden. > --- > emacs/notmuch-hello.el | 20 ++++++++++---------- > 1 files changed, 10 insertions(+), 10 deletions(-) > > diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el > index aad373d..e9caade 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.
This looks fine to me and does speed things up when the "All tags" section is hidden (are there other sections I can hide?) Best wishes Mark
