flim を使って gmail の smtp 経由でメールを送るときのメモ．
何かうまく行かないのでぐぐってみると，gmail の QUIT コマンド時の挙動が正しくないのが原因らしい．そんなわけで，場当たり的な修正 *1．
--- /usr/share/emacs-21.3/site-lisp/flim/smtp.el 2003-12-24 21:44:44.000000000 +0900
+++ smtp.el 2005-09-18 23:20:36.000000000 +0900
@@ -595,9 +595,12 @@
(smtp-find-connection (current-buffer)))
response)
(smtp-send-command connection "QUIT")
- (setq response (smtp-read-response connection))
- (if (/= (car response) 221)
- (smtp-response-error response))))
+ (sleep-for 1)
+ (if (smtp-connection-opened connection)
+ (progn
+ (setq response (smtp-read-response connection))
+ (if (/= (car response) 221)
+ (smtp-response-error response))))))
;;; @ low level process manipulating function
;;;
*1: 解として正しいのかどうかは知らない...
コメントする