smtp.el in slim-1_14 branch on Meadow.

[Tatsuya Ichikawa (Tim - Itchy)]

市川です。

  User-Agent 環境で SLIM 1_14 を使用し、T-gnus の message.el から call
  されている smtp.el の smtp-send-buffer 関数が常に nil を返すために
  smtp 経由での送信に成功しても、下記のコードのため

    (if recipients
	(let ((result (static-if (fboundp 'smtp-send-buffer)
			  (smtp-send-buffer user-mail-address recipients
					    (current-buffer))
			(smtp-via-smtp user-mail-address
				       recipients
				       (current-buffer)))))
	  (unless (eq result t)
	    (error "Sending failed; " result)))

  (error "Sending failed; " result) が評価されます。
  従って、送信に成功しても必ず Sending failed が表示され、一見送信に失敗
  してしまったかのような風に見えてしまいます。

  追いかけ行くと、smtp.el の smtp-close-conection 関数の delete-process
  が Meadow の場合ですと(といっても、他の Platform はわかりませんが) nil
  を返して来るのが原因のようです。
  ただし、ここで常に t を返してしまっていいものかどうかの判断が…はっき
  り言って私にはつきません。(現状は smtp-submit-package 関数の最後で t
  を返すようにしています)

  私だけの環境の問題なのか、それとも User-Agent 環境では発生するものなの
  かがいまいち、確定できません。

  他の Platform の方は、いかがでしょうか??

-- 
  Tim - Itchy- Ichikawa <ichikawa ＠ eitc.epson.com>