   (interactive (notmuch-search-interactive-region))
   (if (member "unread" (notmuch-search-get-tags))
       (notmuch-search-tag '("-unread") beg end)
-    (notmuch-search-tag '("+unread") beg end)))
+    (notmuch-search-tag '("+unread") beg end))
+  (notmuch-search-next-thread))
 ;;
 (defun --notmuch-show-read (&optional beg end)
   "Toggle flag on message(s) from BEG to END."

      (notmuch-search-tag '("-spam") beg end))
    (progn
      (notmuch-search-tag '("+spam") beg end)
      (notmuch-search-tag '("-inbox") beg end))))
;;
(defun --notmuch-show-spam (&optional beg end)
  "Toggle flag on message(s) from BEG to END."

      (notmuch-search-tag '("-spam") beg end))
    (progn
      (notmuch-search-tag '("+spam") beg end)
      (notmuch-search-tag '("-unread") beg end)
      (notmuch-search-tag '("-inbox") beg end))))

;;; Stefan Monnier <foo at acm.org>. It is the opposite of fill-paragraph
