X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=emacs%2Fnotmuch-jump.el;h=1cdf5b5090d7cb594f29338e3eb98cb56f64ceb1;hb=e02bb7e9fdbc96c66f32ce531509824f8afd4686;hp=3e20b8c7afc68e6b9d56a709ecc74283b173ae38;hpb=b15b96f846dcfabbd0c7f43e741573cfd14ab3c8;p=notmuch diff --git a/emacs/notmuch-jump.el b/emacs/notmuch-jump.el index 3e20b8c7..1cdf5b50 100644 --- a/emacs/notmuch-jump.el +++ b/emacs/notmuch-jump.el @@ -56,9 +56,13 @@ fast way to jump to a saved search from anywhere in Notmuch." (oldest-first t) (otherwise (default-value 'notmuch-search-oldest-first))))) (push (list key name - (if (eq (plist-get saved-search :search-type) 'tree) - `(lambda () (notmuch-tree ',query)) - `(lambda () (notmuch-search ',query ',oldest-first)))) + (cond + ((eq (plist-get saved-search :search-type) 'tree) + `(lambda () (notmuch-tree ',query))) + ((eq (plist-get saved-search :search-type) 'unthreaded) + `(lambda () (notmuch-unthreaded ',query))) + (t + `(lambda () (notmuch-search ',query ',oldest-first))))) action-map))))) (setq action-map (nreverse action-map))