[mew-dist 22686] Re: +queue folder

[KOIE Hidetaka ( 鯉江英隆 )]

  Message-Id: <20021224.184007.103002444.kazu at example.com>
  Date:       Tue, 24 Dec 2002 18:40:07 +0900 (JST)
  From:       Kazu Yamamoto (山本和彦) <kazu at example.com>
  Subject:    [mew-dist 22677] Re: +queue folder

  | 再現手順がよく分らないのですが、recipients が nil になる理由は分ります
  | か？ > 鯉江さん

mew-smtp-server => foo.com だとして、
hogehoge at example.com 宛に送信すると User unknown になって失敗すると
再現します。

  | コードのどの部分で宛先が失われるのか、具体的に教えて頂けると嬉しいです。

しらべてみました。
送信中のreceipientsはどんどん削られてしまうので
queuingする前にorig-recipientsから復活させないとだめなんですが
うまく動いてなかったということのようです。

Index: mew-smtp.el
===================================================================
RCS file: /cvsmew/mew/mew-smtp.el,v
retrieving revision 1.59
diff -u -F^( -r1.59 mew-smtp.el
--- mew-smtp.el	2002/12/16 14:19:04	1.59
+++ mew-smtp.el	2002/12/24 11:16:14
@@ -468,13 +468,13 @@ (defun mew-smtp-queue (case err)
     (if (mew-draft-p)
 	(mew-smtp-set-case pnm (mew-tinfo-get-case)))
     ;;
+    (mew-smtp-set-recipients pnm (mew-smtp-get-orig-recipients pnm))
     (let* ((n mew-smtp-info-list-save-length)
 	   (data (make-vector n nil))
 	   (i 0))
       (while (< i n)
 	(aset data i (aref (mew-info pnm) i))
 	(setq i (1+ i)))
-      (mew-smtp-set-recipients data (mew-smtp-get-recipients data))
       (mew-lisp-save info data))
     ;;
     (mew-remove-buffer (current-buffer))

--
鯉江