procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(rmail-summary-delete-forward): Don't move fwd to eob.

Browse source
This commit is contained in:
Richard M. Stallman 1994-10-15 22:24:10 +00:00
parent 78c3981da6
commit cdbea8cae3
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/mail/rmailsum.el
View file

@ -446,7 +446,10 @@ With prefix argument, delete and move backward."
(while (and (not (if backward (bobp) (eobp)))
(save-excursion (beginning-of-line)
(looking-at " *[0-9]+D")))
(forward-line (if backward -1 1))))))
(forward-line (if backward -1 1)))
;; It looks ugly to move to the empty line at end of buffer.
(and (eobp) (not backward)
(forward-line -1)))))
(defun rmail-summary-delete-backward ()
"Delete this message and move to previous nondeleted one.