X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=emacs%2Fnotmuch.el;h=673811ce11eef791f846927095a706378d7500b3;hb=a9ab5e42af4464e37569221b8faaf5a7fec0cc8e;hp=888672b5af3e210f7e3290b635735f4d790f10a2;hpb=ae06fbfc76edc2ef320a51b6f774079d79078963;p=notmuch diff --git a/emacs/notmuch.el b/emacs/notmuch.el index 888672b5..673811ce 100644 --- a/emacs/notmuch.el +++ b/emacs/notmuch.el @@ -892,9 +892,10 @@ PROMPT is the string to prompt with." (process-lines notmuch-command "search" "--output=tags" "*"))) (completions (append (list "folder:" "path:" "thread:" "id:" "date:" "from:" "to:" - "subject:" "attachment:" "mimetype:") + "subject:" "attachment:") (mapcar (lambda (tag) (concat "tag:" tag)) all-tags) - (mapcar (lambda (tag) (concat "is:" tag)) all-tags)))) + (mapcar (lambda (tag) (concat "is:" tag)) all-tags) + (mapcar (lambda (mimetype) (concat "mimetype:" mimetype)) (mailcap-mime-types))))) (let ((keymap (copy-keymap minibuffer-local-map)) (current-query (case major-mode (notmuch-search-mode (notmuch-search-get-query)) @@ -990,6 +991,7 @@ query string as the current search. If the current thread is in the new search results, then point will be placed on the same thread. Otherwise, point will be moved to attempt to be in the same relative position within the new buffer." + (interactive) (let ((target-line (line-number-at-pos)) (oldest-first notmuch-search-oldest-first) (target-thread (notmuch-search-find-thread-id 'bare))