From 45bd6461860c1055d59ce0dd30028c8ff021e59f Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Fri, 30 Jan 2009 03:47:35 +0000 Subject: [PATCH] (rmail-summary-update-line): Replace duplicate line-beginning-position calls. --- lisp/ChangeLog | 7 +++++++ lisp/mail/rmailsum.el | 2 +- 2 files changed, 8 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c009ca435a5..d306ee58404 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,10 @@ +2009-01-30 Glenn Morris + + * mail/rmail.el (rmail-reply): Handle empty folders. + + * mail/rmailsum.el (rmail-summary-update-line): Replace duplicate + line-beginning-position calls. + 2009-01-30 Toby Speight (tiny change) * generic-x.el (hosts-generic-mode, named-database-generic-mode): diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el index d7b1aa2c28e..8da18a055c8 100644 --- a/lisp/mail/rmailsum.el +++ b/lisp/mail/rmailsum.el @@ -754,7 +754,7 @@ a negative argument means to delete and move forward." (while (and (setq ov (car overlays)) (not (setq high (overlay-get ov 'rmail-summary)))) (setq overlays (cdr overlays))) - (delete-region (line-beginning-position) (line-beginning-position 2)) + (delete-region start end) (princ (with-current-buffer rmail-buffer (aset rmail-summary-vector (1- n) (rmail-create-summary-line n))) -- 2.39.2