X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=emacs%2Fnotmuch.el;h=ba833e642e82efc5a30a019b953f154f206e4feb;hb=6c84116091db77c0123e12cdf8331600bf0c7769;hp=f0afa0721628c8d53e7abfe3b8d4e603260d2892;hpb=0eaf4a21dda9519cc08db5b49126b02c4c6b5682;p=notmuch

diff --git a/emacs/notmuch.el b/emacs/notmuch.el
index f0afa072..ba833e64 100644
--- a/emacs/notmuch.el
+++ b/emacs/notmuch.el
@@ -85,11 +85,13 @@ For example:
 `notmuch-read-tag-changes' function.")
 
 (defun notmuch-tag-completions (&optional search-terms)
+  (if (null search-terms)
+      (setq search-terms (list "*")))
   (split-string
    (with-output-to-string
      (with-current-buffer standard-output
        (apply 'call-process notmuch-command nil t
-	      nil "search-tags" search-terms)))
+	      nil "search" "--output=tags" "--exclude=false" search-terms)))
    "\n+" t))
 
 (defun notmuch-select-tag-with-completion (prompt &rest search-terms)