emacs: Fix misuse of `notmuch-tag'

[notmuch.git] / emacs / notmuch.el

diff --git a/emacs/notmuch.el b/emacs/notmuch.el
index c47c6b56854fe59eabd9ecc40b1445242e5c38a0..906ca636a70504471c79a8f7bd46c9c8f37be30e 100644 (file)
--- a/emacs/notmuch.el
+++ b/emacs/notmuch.el
@@ -510,13 +510,14 @@ If BARE is set then do not prefix with \"thread:\""
   "Return a list of authors for the current region"
   (notmuch-search-properties-in-region :subject beg end))
 
-(defun notmuch-search-show-thread ()
+(defun notmuch-search-show-thread (&optional elide-toggle)
   "Display the currently selected thread."
-  (interactive)
+  (interactive "P")
   (let ((thread-id (notmuch-search-find-thread-id))
        (subject (notmuch-search-find-subject)))
     (if (> (length thread-id) 0)
        (notmuch-show thread-id
+                     elide-toggle
                      (current-buffer)
                      notmuch-search-query-string
                      ;; Name the buffer based on the subject.
@@ -837,7 +838,7 @@ non-authors is found, assume that all of the authors match."
 
 See `notmuch-tag' for information on the format of TAG-CHANGES."
   (interactive)
-  (apply 'notmuch-tag notmuch-search-query-string tag-changes))
+  (notmuch-tag notmuch-search-query-string tag-changes))
 
 (defun notmuch-search-buffer-title (query)
   "Returns the title for a buffer with notmuch search results."