呑んだくれ改めレッツゴー痛風日記

_ wanderlustでsmtp over sslするとqmailが451を返す。

この５年ほど、MUAはずっとMeadow+Mewを使っていたのだが、SMTP over SSL が完了しないと同じ現象が頻発してしまい、かなり日常業務に支障をきたすようになってしまったので、wanderlustに乗り換えてみた。

info見ながら設定して動かしてみると、pop over ssl は問題なく動作したのだが、smtp over sslが全然ダメ。いろいろWebで調べてみたのが、どうにも設定には問題なさそう。opensslじゃなくて、starttlsを入れてみたりいろいろやってみたが、全然ダメ。そもそもログを見ると、SMTP AUTHは通ってて、その後サーバから451を返されている。451ってメールサーバのローカルエラーですよね？そんなの自分で管理しているサーバじゃないからお手上げだなぁ、と思っていたら、同じ現象で苦しんでいる方を発見。→smtp-end-of-line for SMTP over SSL

wl-smtp-connection-type が 'ssl の場合は smtp-end-of-line を "¥n"に設定しているようだったので、smtp-primitive-data() の中でだけsmtp-end-of-line を "¥r¥n" にしてみたところうまく送信できるようになりました。

とのことなので、早速flim/smtp.elの下記のように変更してbyte-compileしてみた。

・・・＜前略＞・・・
(defun smtp-primitive-data (package)
  (setq smtp-end-of-line "\r\n") ;; ← qmail対策でこの1行を追加。
  (let* ((connection
	  (smtp-find-connection (current-buffer)))
	 response def prev)
・・・＜以下略＞・・・

ドキドキしながら動かしてみると、おおっ、送信できたぞ！わーい。ちなみに、テストメールは自分のメールアドレスを間違っていてエラーメールが返ってきました。ちゃんちゃん。