# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1123556250 0
# Node ID ece90261ed4209fce8f281a83fbbcab7e8e58b5c
# Parent  74dda054615b6c2ed1e1cd30ee19a2f0f6e3c913
(mail-yank-original): Use with-no-warnings.

diff -r 74dda054615b -r ece90261ed42 lisp/mail/sendmail.el
--- a/lisp/mail/sendmail.el	Tue Aug 09 02:57:09 2005 +0000
+++ b/lisp/mail/sendmail.el	Tue Aug 09 02:57:30 2005 +0000
@@ -1432,7 +1432,9 @@
 	  ;; delete that window to save screen space.
 	  ;; t means don't alter other frames.
 	  (delete-windows-on original t)
-	  (insert-buffer original)
+	  (with-no-warnings
+	    ;; We really want this to set mark.
+	    (insert-buffer original))
 	  (set-text-properties (point) (mark t) nil))
 	(if (consp arg)
 	    nil