From 40721b4a7843b3c76d228b36383ef7c288c6601d Mon Sep 17 00:00:00 2001
From: hayashi <hayashi>
Date: Fri, 21 Aug 1998 02:50:55 +0000
Subject: [PATCH] copy two more local variables in message-clone-locals

---
 lisp/message.el |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/message.el b/lisp/message.el
index 1e49daa..b9113bb 100644
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -3406,7 +3406,6 @@ Headers already prepared in the buffer are not modified."
   (when actions
     (setq message-send-actions actions))
   (setq message-reply-buffer replybuffer)
-  (goto-char (point-min))
   ;; Insert all the headers.
   (mail-header-format
    (let ((h headers)
@@ -3421,6 +3420,7 @@ Headers already prepared in the buffer are not modified."
   (when message-default-headers
     (insert message-default-headers)
     (or (bolp) (insert ?\n)))
+  (goto-char (point-max))
   (put-text-property
    (point)
    (progn
@@ -4216,7 +4216,7 @@ regexp varstr."
   (let ((locals (save-excursion
 		  (set-buffer buffer)
 		  (buffer-local-variables)))
-	(regexp "^gnus\\|^nn\\|^message"))
+	(regexp "^gnus\\|^nn\\|^message\\|user-mail-address\\|user-full-name"))
     (mapcar
      (lambda (local)
        (when (and (consp local)
-- 
1.7.10.4