[Mew-dist 14617] Re: pick

[SAKAI Kiyotaka]

>> In article <20001017.174523.74754214.kazu at example.com>, Kazu Yamamoto (山本和彦) <kazu at example.com> writes:

> Pick の pattern がまともになった mewls をお届けます。
> 	ftp://ftp.mew.org/pub/Mew/alpha/bin.tar.gz

これで mew-pick-define-macro も復活させられますね。

1. Mew-1.94.2 の mew-pick.el に含まれる mew-pick-define-macro,
  mew-pick-macro-expand, mew-pick-macro-expand-string はそのまま使えま
  すので、それを持ってくる。

2. mew-minibuf.el に以下のパッチを当てる。

ちなみに、知らない人向けに書いておくと、mew-pick-define-macro は

  (add-hook 'mew-init-hook
            '(lambda ()
               (mew-pick-define-macro "tocc=#" "to=#|cc=#")
               (mew-pick-define-macro "mew" "tocc=mew")))

のようの設定を入れると、pick 時に tocc のようなマクロが使えるようにな
るというものです。

ところで、今の pick は大文字・小文字を区別するようですが、これを区別し
ないようにすることはできないものでしょうか？


--- mew-minibuf.el	2000/10/17 09:18:04	1.1
+++ mew-minibuf.el	2000/10/17 09:18:31
@@ -140,11 +140,12 @@
     (define-key keymap " " nil)
     (setq ret
 	  (mew-pick-canonicalize-pattern
-	   (read-from-minibuffer prompt
-				 mew-pick-default-field
-				 keymap
-				 nil
-				 'mew-input-pick-pattern-hist)))
+	   (mew-pick-macro-expand-string
+	    (read-from-minibuffer prompt
+				  mew-pick-default-field
+				  keymap
+				  nil
+				 'mew-input-pick-pattern-hist))))
     (mew-decode-syntax-delete)
     ret))
 

-- 
酒井 清隆 (E-mail: ksakai at example.com)