From: tsuchiya <tsuchiya>
Date: Tue, 10 Jun 2003 09:50:08 +0000 (+0000)
Subject: * lisp/message.el (message-yank-original): When
X-Git-Tag: t-gnus-6_16_2-02~4
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=3b7bfe2b15a95b44c0c9a49e5556583bc6ce85a1;p=elisp%2Fgnus.git-

* lisp/message.el (message-yank-original): When
`message-reply-headers' is equal to nil, do not reset its
message-id and references.

* .cvsignore, etc/.cvsignore, lisp/.cvsignore, texi/.cvsignore,
texi/ps/.cvsignore: Created.
---

diff --git a/.cvsignore b/.cvsignore
index 9c59f23..ef8b81c 100644
--- a/.cvsignore
+++ b/.cvsignore
@@ -1,8 +1,4 @@
 Makefile
 config.cache
 config.log
-config.status
-diff-lisp.el
-diffit
-makepub
-cvs-access
+config.status*
diff --git a/ChangeLog b/ChangeLog
index 2dd4eb3..a35c0a2 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,12 @@
+2003-06-10  TSUCHIYA Masatoshi  <tsuchiya@namazu.org>
+
+	* lisp/message.el (message-yank-original): When
+	`message-reply-headers' is equal to nil, do not reset its
+	message-id and references.
+
+	* .cvsignore, etc/.cvsignore, lisp/.cvsignore, texi/.cvsignore,
+	texi/ps/.cvsignore: Created.
+
 2003-05-22  Katsumi Yamaoka  <yamaoka@jpl.org>
 
 	* lisp/gnus-vers.el (gnus-revision-number): Increment to 01.
diff --git a/etc/.cvsignore b/etc/.cvsignore
index 7a03f3f..f3c7a7c 100644
--- a/etc/.cvsignore
+++ b/etc/.cvsignore
@@ -1,4 +1 @@
-gnus
-message
-smilies
-sounds
+Makefile
diff --git a/lisp/.cvsignore b/lisp/.cvsignore
index 22fc52c..f931ff2 100644
--- a/lisp/.cvsignore
+++ b/lisp/.cvsignore
@@ -1,4 +1,3 @@
 Makefile
-version
-*.elc
+dgnuspath.el
 gnus-load.el
diff --git a/lisp/message.el b/lisp/message.el
index 4788d14..e9d85b8 100644
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -3313,8 +3313,9 @@ be added to the \"References\" field."
 			     refs)
 		;; If the References field has been changed, we make it
 		;; visible in the header.
-		(mail-header-set-message-id message-reply-headers nil)
-		(mail-header-set-references message-reply-headers nil)
+		(when message-reply-headers
+		  (mail-header-set-message-id message-reply-headers nil)
+		  (mail-header-set-references message-reply-headers nil))
 		(widen)
 		(message-narrow-to-headers)
 		(if (let ((case-fold-search t))
diff --git a/texi/.cvsignore b/texi/.cvsignore
index 0d3a100..83b255d 100644
--- a/texi/.cvsignore
+++ b/texi/.cvsignore
@@ -2,18 +2,10 @@ Makefile
 emacs-mime
 gnus
 gnus-[0-9]*
+gnus-ja
+gnus-ja-[0-9]*
+gnusconfig.tex
 message
-gnustmp.texi
-*.dvi
-*.log
-etc
-herds
-misc
-picons
-*.aux
-screen
-smilies
-xface
-gnus.ps
-gnusmail.texi
-pspackage.tar.gz
+message-[0-9]*
+message-ja
+sieve
diff --git a/texi/ps/.cvsignore b/texi/ps/.cvsignore
index 2eedd36..f3c7a7c 100644
--- a/texi/ps/.cvsignore
+++ b/texi/ps/.cvsignore
@@ -1,3 +1 @@
-*.ps
-*.pdf
 Makefile