From bf71490505cb3c6781f812d8cd92b1ee2e8fe9c7 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 3 Nov 2005 21:34:54 +0000 Subject: [PATCH] Use insert-buffer-substring, not insert-buffer. --- lisp/mail/feedmail.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/mail/feedmail.el b/lisp/mail/feedmail.el index 101e96c8554..3bd287541cf 100644 --- a/lisp/mail/feedmail.el +++ b/lisp/mail/feedmail.el @@ -1372,7 +1372,7 @@ complicated cases." (if (string-match tracer (buffer-name buffy)) (progn (insert "SMTP Trace from " (buffer-name buffy) "\n---------------") - (insert-buffer buffy) + (insert-buffer-substring buffy) (insert "\n\n")))) (buffer-list)))))) @@ -1989,7 +1989,7 @@ mapped to mostly alphanumerics for safety." (set-buffer feedmail-prepped-text-buffer) (erase-buffer) ;; jam contents of user-supplied mail buffer into our scratch buffer - (insert-buffer feedmail-raw-text-buffer) + (insert-buffer-substring feedmail-raw-text-buffer) ;; require one newline at the end. (goto-char (point-max)) @@ -2215,7 +2215,7 @@ feedmail-fiddle-plex-blurb." (erase-buffer) ;; not life's most efficient methodology, but spraying isn't ;; an every-5-minutes event either - (insert-buffer feedmail-prepped-text-buffer) + (insert-buffer-substring feedmail-prepped-text-buffer) ;; There's a good case to me made that each separate transmission of ;; a message in the spray should have a distinct Message-Id:. There ;; is also a less compelling argument in the other direction. I think -- 2.39.2