[Mew-dist 05777] Re: key の定義

[SUGITA Toshinori]

From: Yamada Yasuharu (山田康晴) <yasuharu at example.com>
Subject: [Mew-dist 05776] Re: keyの定義
Date: Sat, 1 Aug 1998 13:13:26 +0900

> sugita> いま、実験してみたら、
> sugita> (mew-summary-refile '("+hogehoge") nil)
> sugita> ってので特定フォルダにリファイルできましたので、
> sugita> Ctrl-: (eval-expression) で、上のコマンドを実行するっていう
> sugita> キーマクロをつくってそれを記録してしまうっていう手とか、
> sugita> (defun refile-spacial 
> sugita>  (mew-summary-refile '("+hogehoge") nil))
> sugita> (define-key mew-summary-mode-map "キー定義" 'refile-special)
> sugita> みたいなかんじでいいのではないでしょうか？
> 
> 杉田さんのお答えが一番私の目的にあっていそうなので、
> ~/.emacs 内に
> 	(defun refile-spacial 
> 	(mew-summary-refile '("+hogehoge") nil))
> 	(define-key mew-summary-mode-map "1" 'refile-special)
> と適当なところに記述して、Meadow+mew を再起動しましたが、
> summary 内で 1 を打つと Buffer is read-only: #<buffer +inbox> と
> 出てしまい、refile mark ができません。
> 
> 何が悪いのでしょうか?

またまた実験してみました。
確かにうまくいかないですね。。。なんでだろう？？？
eval-expressionで直接実行するとうまく行くんですけど、、、

どなたかお分かりになる方、おられますか？

＃ちなみにeval-expressionをキーボードマクロにするとちゃんと実行されます。

 >>>>>>>>>>>>>>> SUGITA, Toshinori <<<<<<<<<<<<<<<<
 >>>>>>>>>>>>>>>     杉田 敏典     <<<<<<<<<<<<<<<<
 E-Mail : sugita at example.com          --- official
          sugita at example.com --- private
          sugita at example.com --- PostPet
 ICQ UID: 3625300 (Bin - Toshinori Sugita)