[mew-dist 29187] Re: +queue に残ってしまう場合

[Naotaka YAMAMOTO]

本題の方も．
> 原因がわかるといちばんよいのですが、
についてもう一つ．

最近，well known(22,80,443等)ポート以外に接続できない
ネットワーク（外向きが制限されている）にしばしば出会います．
その場合，メール送信時に 587 に接続できなくて +queueに
行ってることがありました．

山本直孝＠つくば

From: KOIE Hidetaka (鯉江英隆) <hide at example.com>
Subject: [mew-dist 29162] Re: +queue に残ってしまう場合
Date: Wed, 17 Mar 2010 17:47:02 +0900 (JST)

>   Message-Id: <20100316.151400.163221748.lifebook-4234377 at example.com
>   Date:       Tue, 16 Mar 2010 15:14:00 -0400 (EDT)
>   From:       Ryuji Suzuki <rs at example.com>
>   Subject:    [mew-dist 29160] +queue に残ってしまう場合
> 
>   | mew から SMTP over SSH をつかってメールを送っていますが、
>   | 何らかの条件でメールが正常に送信されず、+queueに溜ることを何度
>   | も経験しています。気づかずに数日が過ぎ、揉めたこともあります。
> 
> 原因がわかるといちばんよいのですが、
> 
>   | 
>   | メールの出口でこのようなメールがひっかかっている場合、定期的に
>   | チェックしてエラーメッセージを出すとか、何か方法はないでしょう
>   | か。
> 
> こんなのをでっちあげてみました。
> 
> (defvar mew-queue-watch-interval 5)
> (defvar mew-queue-watch-timer nil)
> (defun mew-queue-watch ()
>   (when (directory-files (mew-expand-folder "+queue") nil "^[1-9][0-9]*$" nil)
>     (message "queue is not empty")))
> (defun mew-queue-watch-start ()
>   (interactive)
>   (setq mew-queue-watch-timer
>         (run-with-idle-timer mew-queue-watch-interval
>                              mew-queue-watch-interval
>                              'mew-queue-watch)))
> (defun mew-queue-watch-stop ()
>   (interactive)
>   (cancel-timer mew-queue-watch-timer)
>   (setq mew-queue-watch-timer nil)
>   (cancel-function-timers 'mew-queue-watch))
> (provide 'mew-queue-watch)
> 
> --
> 鯉江英隆 <hide at example.com>