[Date Prev][Date Next][Thread Prev][][Date Index][Thread Index]

shimbun/sb-mhonarc.el need not isert Reply-To



shimbun/shimbun.elのshimbun-header-insertがReply-Toを
つけるようになっているので、shimbun/sb-mhonarc.elでは
Reply-Toを付けない方がよいと思います。

-- 
SAITO Takuya <reed@lily.freemail.ne.jp>
Index: shimbun/sb-mhonarc.el
===================================================================
RCS file: /storage/cvsroot/emacs-w3m/shimbun/sb-mhonarc.el,v
retrieving revision 1.21
diff -u -r1.21 sb-mhonarc.el
--- shimbun/sb-mhonarc.el	2002/02/28 00:14:34	1.21
+++ shimbun/sb-mhonarc.el	2002/07/04 07:54:48
@@ -127,7 +127,7 @@
 	  (while (search-forward "\t" nil t)
 	    (replace-match " "))
 	  (goto-char (point-min))
-	  (let (buf refs reply-to)
+	  (let (buf refs)
 	    (while (not (eobp))
 	      (cond
 	       ((looking-at "<!--")
@@ -161,8 +161,6 @@
 	       ((looking-at "Content-Type: ")
 		(delete-region (point) (progn (forward-line 1) (point))))
 	       (t (forward-line 1))))
-	    (if (setq reply-to (shimbun-reply-to shimbun))
-		(insert "Reply-To: " reply-to "\n"))
 	    (insert "MIME-Version: 1.0\n")
 	    (insert "Content-Type: text/html; charset=ISO-2022-JP\n")
 	    (if refs