From 9d1b6122fc44b16bc4590baf99b40d393e729c94 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Tue, 17 Nov 1998 10:31:57 +0000 Subject: [PATCH] * lisp/message.el (message-clone-locals): Add "user-mail-address" and "user-full-name" to macthing pattern. ;; Commit by Hiroaki Matsui --- lisp/message.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/message.el b/lisp/message.el index 60e6ed9..777315b 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -4632,7 +4632,8 @@ regexp varstr." (let ((locals (save-excursion (set-buffer buffer) (buffer-local-variables))) - (regexp "^gnus\\|^nn\\|^message")) + (regexp + "^\\(gnus\\|nn\\|message\\|user-\\(mail-address\\|full-name\\)\\)")) (mapcar (lambda (local) (when (and (consp local) -- 1.7.10.4