]> git.notmuchmail.org Git - notmuch/blobdiff - notmuch.el
notmuch.el: Fix to show *something* when all messages are already read.
[notmuch] / notmuch.el
index 81c7b4475a0e38d2867db1ff29f6f92f0ee04fd1..66291fb8a012aab52be152fb3d6089842f561653 100644 (file)
@@ -175,8 +175,8 @@ the buffer."
 (defun notmuch-show-next-unread-message ()
   "Advance to the beginning of the next unread message in the buffer.
 
-Does nothing if there are no more unread messages past the
-current point."
+Moves to the end of the buffer if there are no more unread
+messages past the current point."
   (while (and (not (eobp))
              (not (member "unread" (notmuch-show-get-tags))))
     (notmuch-show-next-message)))
@@ -184,7 +184,7 @@ current point."
 (defun notmuch-show-find-next-unread-message ()
   "Returns the position of the next message in the buffer.
 
-Returns the current point if there are no more unread messages
+Or the end of the buffer if there are no more unread messages
 past the current point."
   ; save-excursion doesn't save our window position
   ; save-window-excursion doesn't save point
@@ -423,6 +423,8 @@ thread from that buffer can be show when done with this one)."
        (notmuch-show-markup-messages)
        )
       (notmuch-show-next-unread-message)
+      (if (eobp)
+         (goto-char (point-min)))
       )))
 
 (defvar notmuch-search-mode-map