[xyzzy:07528] Re: 指定したディレクトリを Grep

[Hironobu NAKAGAWA <nakagawa@xxxxxxxxxxxxxxxxx>]

亀井さんへ

KAMEI Tetsuya <kamei@xxxxxxxxxxxx> wrote:

> (defun foo ()
>   (let ((ed::*grep-directory-name-hook*
> 	 #'(lambda ()
> 	     (pop si:*command-line-args*))))
>     (declare (special ed::*grep-directory-name-hook*))
>     (grep-dialog)))
> 
> とか定義しておいて、-f foo "ディレクトリ" を渡せばたぶ
> ん動きます。

これを使って起動したxyzzyで、メニューからgrepやM-x grep-dialogすると、
「変数が定義されていません *grep-directory-name-hook*」
と出てエラーになります。
fooはsiteinit.lに定義しています。
*grep-directory-name-hook*を元に戻してからfooを抜けないといけないような
気がしますが、なにぶんlispはわからないんで、、、、


------------------------------------------------------------
中川浩伸 (Hironobu Nakagawa)
 松下AVCマルチメディアソフト株式会社(MMS)
  email:h-nakagawa@xxxxxxxxxxxxx  TEL:06-6906-1580  MEITS:7-617-3130
 常駐先：松下電器産業株式会社 マルチメディア開発センター(西門真地区)
  email:nakagawa@xxxxxxxxxxxxxxxxx