[mew-dist 22197] Re: 他のcaseに移動&incしてdefaultに戻る楽な方法は?
Takashi Masuda ( 増田貴士 )
masutaka at example.com
2002年 11月 6日 (水) 23:03:15 JST
増田です。
Wed, 06 Nov 2002 11:19:36 +0900 (JST) 頃の
Hideyuki SHIRAI (白井秀行) <shirai at example.com> さんの内容は...
Subject: [mew-dist 22191] Re: 他のcaseに移動&incしてdefaultに戻る楽な方法は?
> # うーーん、すごい。目から鱗状態。
ちょっと強引でしたか?(*^^*)
> あまり実験していませんが、単純に
>
> (defun mew-summary-retrieve-for-another-case ()
> (interactive)
> (let ((mew-case-input (mew-input-case mew-case-input "Another retrieve")))
> (mew-summary-retrieve 'noflush)))
>
> で動くと思います。いつも同じ case に切り変えたいなら
> mew-input-case() の部分は単に case の文字列にしてしまえば良いで
> しょう。また、'noflush はお好みで。
どうもありがとうございました。
おかげさまで少し幸せになれました。
--
Takashi Masuda <masutaka at example.com>
Mew-dist メーリングリストの案内