From 190f2db78606c3afc35d72902f52d6eec206642e Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Tue, 16 Aug 2022 14:58:43 +0200 Subject: [PATCH] Fix buffer-start cleanup in message-indent-citation * lisp/gnus/message.el (message-indent-citation): Fix thinko in loop. --- lisp/gnus/message.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 90d8a744dec..ad74d2f1297 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -3928,9 +3928,8 @@ However, if `message-yank-prefix' is non-nil, insert that prefix on each line." (goto-char start) (forward-line 1)))) ;; Delete blank lines at the start of the buffer. - (while (and (point-min) - (eolp) - (not (eobp))) + (goto-char (point-min)) + (while (and (eolp) (not (eobp))) (message-delete-line)) ;; Delete blank lines at the end of the buffer. (goto-char (point-max)) -- 2.39.5