[xyzzy:03847] Re: ミニバッファと xyzzycli

[Tetsuya Kamei <kamei@xxxxxxxxxxxx>]

穂浪さん、こんにちは。

        Sun, 16 Jan 2000 15:44:51 +0900 の
        [xyzzy:03846] ミニバッファと xyzzycli
        への返事です.

| I と J の区別がつかない穂浪です．(^^;

すでに J も使ってるような…。

| Find file や Replace string などでミニバッファを開いた状態で
| xyzzycli からファイルを渡すと，とっても変な動作になります．

あ、ほんまや。直します。

| # や，「文句を言いながらもファイルを受け取ってくれる」
| # ようになるなら最高なんですけど．(^^;;;

こういう動きになる予定ですが。

(in-package "editor")
(defun *xyzzycli-helper (dir args)
  (si:*show-window-foreground)
  (let ((si:*command-line-args* args)
	(w (selected-window))
	waitobj)
    (when (equal (car si:*command-line-args*) "-wait")
      (setq waitobj (si:*create-wait-object))
      (pop si:*command-line-args*))
    (unwind-protect
	(progn
	  (when (minibuffer-window-p w)
	    (other-window))
	  (process-command-line-1 dir waitobj))
      (set-window w))
    waitobj))

--
亀井哲弥(Tetsuya Kamei)
kamei@xxxxxxxxxxxx/JCA00343@xxxxxxxxxxx