[mew-dist 22966] Re: メールが遅れなくなってしまいました

[Hideyuki SHIRAI ( 白井秀行 )]

From: Yasuhiko Tandou <tandou at example.com> さん曰く
Subject: [mew-dist 22963] Re: メールが遅れなくなってしまいました
Message-ID: <20030121.235451.57970645.tandou at example.com>
Date: Tue, 21 Jan 2003 23:54:51 +0900 (JST)

> > mew-fake-cdp-sending をはずしましょう、に一票。
> > 
> > # 実はぼくも昨日悩んだ。
> 
>   ありがとうございました。解決しました。
>   でも、これが無いと読めない、読めないの連続で…。困ったもんです。

mew-fake-cdp-sending で advice していた関数の引数の個数が変わっ
たのが原因でした。けど、良くみると hook が用意されているので、そ
れを使うように変更してみました。

# 使い方は一緒です。オリジナルが良くわからなかったので、(あまり
# に邪悪な寄生虫なので、あえて入手先は書きませんが :-)さっき後藤
# さんちから貰ってきたものです。

-- 
白井秀行 (mailto:shirai at example.com)
-------------- next part --------------
--- mew-fake-cdp-sending.el.orig	Wed Nov  6 23:27:44 2002
+++ mew-fake-cdp-sending.el	Wed Jan 22 12:17:30 2003
@@ -58,8 +57,7 @@
 	      (mew-draft-undo))
 	    (signal (car data) (cdr data))))))
 
-(defadvice mew-encode-singlepart (before fake-cdp
-			(syntax &optional path depth buffered) activate)
+(defun mew-fake-cdp-sending (syntax path depth buffered)
   "DANGER!
 This enables non-ascii filename attachement with
 non-RFC encoding like filename==?iso-2022-jp?b?....?=.
@@ -114,5 +112,7 @@
 		(mew-syntax-set-cdp syntax 
 				    (list (car cdpl)
 					  (list "filename" cdp))))))))))
+
+(add-hook 'mew-encode-singlepart-hook 'mew-fake-cdp-sending)
 
 ;; mew-fake-cdp-sending.el ends here