* mu4e: make `mu4e-view-scroll-up-or-next' a bit more robust

This commit is contained in:
djcb 2012-10-17 12:26:11 +03:00
parent 29a94c4b2f
commit 9dd0e849a6
1 changed files with 6 additions and 5 deletions

View File

@ -1068,11 +1068,12 @@ attachments) in response to a (mu4e~proc-extract 'temp ... )."
"Scroll-up the current message; if mu4e-view-scroll-to-next is "Scroll-up the current message; if mu4e-view-scroll-to-next is
non-nil, and we can't scroll-up anymore, go the next message." non-nil, and we can't scroll-up anymore, go the next message."
(interactive) (interactive)
(if (and mu4e-view-scroll-to-next (condition-case nil
(zerop (- (point-max) (window-end nil t)))) (scroll-up)
(mu4e-view-headers-next) (error
(scroll-up))) (when mu4e-view-scroll-to-next
(mu4e-view-headers-next)))))
(defun mu4e-view-unmark-all () (defun mu4e-view-unmark-all ()
"If we're in split-view, unmark all messages. Otherwise, warn "If we're in split-view, unmark all messages. Otherwise, warn
user that unmarking only works in the header list." user that unmarking only works in the header list."