Ensure valid end/beginning lines in message-mark-inserted-region

* lisp/gnus/message.el (message-mark-inserted-region): Ensure
there's a newline before inserting the end line (bug#51324).

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index d460f9bd922f85c8fda1611e77dd6ff76a46d177..bbf1c78a01f4decdf9abf7b06df0c5aabf8bd1db 100644 (file)
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -2395,6 +2395,8 @@ If VERBATIM, use slrn style verbatim marks (\"#v+\" and \"#v-\")."
   (save-excursion
     ;; add to the end of the region first, otherwise end would be invalid
     (goto-char end)
+    (unless (bolp)
+      (insert "\n"))
     (insert (if verbatim "#v-\n" message-mark-insert-end))
     (goto-char beg)
     (insert (if verbatim "#v+\n" message-mark-insert-begin))))