From: bg66 <bg66>
Date: Tue, 9 Jan 2007 05:58:16 +0000 (+0000)
Subject: * mixi-gnus.el (message-mixi-p): Change the pseudo header to
X-Git-Tag: mixi-el-1_0_0~122
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=7a8f1aff028d6f1abf59a99d5524f676176fa7bc;p=elisp%2Fmixi.git

* mixi-gnus.el (message-mixi-p): Change the pseudo header to
`Mixi-To:'.
(message-send-via-mixi): Ditto.
---

diff --git a/ChangeLog b/ChangeLog
index e963711..03df948 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,11 @@
 2007-01-09  OHASHI Akira  <bg66@koka-in.org>
 
+	* mixi-gnus.el (message-mixi-p): Change the pseudo header to
+	`Mixi-To:'.
+	(message-send-via-mixi): Ditto.
+
+2007-01-09  OHASHI Akira  <bg66@koka-in.org>
+
 	* mixi-gnus.el (message-mixi-p): Simplify.
 
 2007-01-09  OHASHI Akira  <bg66@koka-in.org>
diff --git a/mixi-gnus.el b/mixi-gnus.el
index 5557ea4..4e7c72c 100644
--- a/mixi-gnus.el
+++ b/mixi-gnus.el
@@ -43,7 +43,7 @@
        (save-excursion
 	 (save-restriction
 	   (message-narrow-to-headers)
-	   (or (message-fetch-field "mixi")
+	   (or (message-fetch-field "mixi-to")
 	       (string-match shimbun-mixi-to-regexp
 			     (message-fetch-field "to")))))))
 
@@ -56,7 +56,7 @@
     (with-current-buffer mailbuf
       (goto-char (point-min))
       (when (search-forward "\nTo: " nil t)
-	(replace-match "\nMixi: ")))
+	(replace-match "\nMixi-To: ")))
     (unwind-protect
 	(save-excursion
 	  (set-buffer tembuf)
@@ -65,7 +65,7 @@
 	  (insert (with-current-buffer mailbuf
 		    (mml-buffer-substring-no-properties-except-hard-newlines
 		     (point-min) (point-max))))
-	  (shimbun-mixi-send-mail (message-fetch-field "mixi")
+	  (shimbun-mixi-send-mail (message-fetch-field "mixi-to")
 				  (message-fetch-field "subject")
 				  (buffer-substring (message-goto-body)
 						    (point-max))))