entered into RCS

diff --git a/lisp/mail/rnewspost.el b/lisp/mail/rnewspost.el
index 3df83b65efbebd269f98cbb23c8749b5d1fd8ff4..81945df773ccc7622d811a03e20ee6dc2669fc23 100644 (file)
--- a/lisp/mail/rnewspost.el
+++ b/lisp/mail/rnewspost.el
@@ -203,7 +203,7 @@ news-reply-mode."
              (mail-archive-file-name nil))
          (mail-setup to subject in-reply-to nil replybuffer nil)
          (beginning-of-line)
-         (kill-line 1)
+         (delete-region (point) (progn (forward-line 1) (point)))
          (goto-char (point-max)))
       (mail-setup to subject in-reply-to nil replybuffer nil))
     ;;;(mail-position-on-field "Posting-Front-End")