# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 710469918 0
# Node ID 1b0748ff6f65bfeacbc877457259288cc8edbebc
# Parent  98bdd205ec6f8c510ebfa6c67452aff439434c16
*** empty log message ***

diff -r 98bdd205ec6f -r 1b0748ff6f65 lisp/mail/sendmail.el
--- a/lisp/mail/sendmail.el	Mon Jul 06 22:33:26 1992 +0000
+++ b/lisp/mail/sendmail.el	Tue Jul 07 00:45:18 1992 +0000
@@ -370,7 +370,8 @@
 					"From: " (user-login-name) "\n"
 					"Date: " (current-time-string) "\n")
 				(insert-buffer-substring curbuf beg end)
-				(insert "\n\C-_"))
+				(insert "\n\C-_")
+				(rmail-set-message-counters))
 			    (insert-buffer-substring curbuf beg end)))
 		      (if max (narrow-to-region (point-min) max))))))
 	    ;; Else append to the file directly.