diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-08-26 12:30:30 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-08-26 12:30:37 +0200 |
| commit | 762a37b5e52852b09324656c884298e34a452273 (patch) | |
| tree | ef79cbead32f76286e5bb4cfdddc302e32b524d7 | |
| parent | 2888a2e076e0ffea098b435b8b124acaeb6a5d0b (diff) | |
| download | emacs-762a37b5e52852b09324656c884298e34a452273.tar.gz | |
Delete blank lines at the start of the cited text in message-indent-citation
* lisp/gnus/message.el (message-indent-citation): Fix thinko in
the fix for the previous thinko.
| -rw-r--r-- | lisp/gnus/message.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index b98e623db80..49a04f601f8 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -3928,8 +3928,7 @@ However, if `message-yank-prefix' is non-nil, insert that prefix on each line." (if all-removed (goto-char start) (forward-line 1)))) - ;; Delete blank lines at the start of the buffer. - (goto-char (point-min)) + ;; Delete blank lines at the start of the cited text. (while (and (eolp) (not (eobp))) (delete-line)) ;; Delete blank lines at the end of the buffer. |