comparison lisp/mail/rmailsum.el @ 22546:8322a6923140

(rmail-summary-rmail-update): Fix indentation.
author Karl Heuer <kwzh@gnu.org>
date Mon, 22 Jun 1998 18:23:14 +0000
parents 312d6d72be14
children 8d1c55a12c94
comparison
equal deleted inserted replaced
22545:5d3f50b4c8d2 22546:8322a6923140
771 (set-buffer rmail-buffer) 771 (set-buffer rmail-buffer)
772 ;; If we first saw the previous message in this search, 772 ;; If we first saw the previous message in this search,
773 ;; and we have gone to a different message while searching, 773 ;; and we have gone to a different message while searching,
774 ;; put back `unseen' on the former one. 774 ;; put back `unseen' on the former one.
775 (if rmail-summary-put-back-unseen 775 (if rmail-summary-put-back-unseen
776 (rmail-set-attribute "unseen" t 776 (rmail-set-attribute "unseen" t
777 rmail-current-message)) 777 rmail-current-message))
778 ;; Arrange to do that later, for the new current message, 778 ;; Arrange to do that later, for the new current message,
779 ;; if it still has `unseen'. 779 ;; if it still has `unseen'.
780 (setq rmail-summary-put-back-unseen 780 (setq rmail-summary-put-back-unseen
781 (rmail-message-labels-p msg-num ", ?\\(unseen\\),"))) 781 (rmail-message-labels-p msg-num ", ?\\(unseen\\),")))
782 (setq rmail-summary-put-back-unseen nil)) 782 (setq rmail-summary-put-back-unseen nil))