Re: fep control on minibuffer

[Hideyuki SHIRAI (白井秀行) <shirai@xxxxxxxxxxxxxxxxxxx>]

白井です。

## 改ページしまくっています。

From: "T.Fukagawa" <bruce@xxxxxxxxxx> さん曰く
Subject: fep control on minibuffer
Message-ID: <199910061709.CAA09513@xxxxxxxxxx>
Date: Thu, 7 Oct 1999 02:09:00 +0900 (JST)

深川> もとのバッファで、fep on の状態で、（たとえば、\C-xd とかで）minibuffer に
深川> カーソルが移動すると、たいがいは　fep off の状態になるのですが、

深川> super-smart-find-write-file
深川> super-smart-find-file

super-smart-find は

(defadvice read-char-ignore-errors (before fep-set-off activate)
  (if (not (fep-get-mode))
	 ()
    (fep-force-off)
    (run-hooks 'mw32-ime-off-hook)))

でいいみたいです。

深川> save-buffers-kill-emacs

これがちょっと謎なのですが、私の ~/.emacs にはこんな風に羅列して
あり、

(add-hook 'minibuffer-setup-hook
	  '(lambda ()
	     (and (fep-get-mode)
		  (fep-force-off))))

(wrap-function-to-control-ime 'universal-argument t nil)
(wrap-function-to-control-ime 'read-string nil nil)
(wrap-function-to-control-ime 'read-from-minibuffer nil nil)
(wrap-function-to-control-ime 'y-or-n-p nil nil)
(wrap-function-to-control-ime 'yes-or-no-p nil nil)
(wrap-function-to-control-ime 'map-y-or-n-p nil nil)
(eval-after-load "ange-ftp"
  '(wrap-function-to-control-ime 'ange-ftp-get-passwd nil nil))

save-buffers-kill-emacs は  map-y-or-n-p 対策でいいと思うのです
が、だめでした。

深川> isearch-forward
深川> 
深川> のときは、minibuffer には、カーソルはこないのですが、そのままキー入力する
深川> と、もとのバッファに「あああ」とかの未確定文字がでて、確定すると、検索がキャ
深川> ンセルされてしまいます。

以前からなんとかならないかなぁと思っていたのですが、これは、
敗北宣言 ;_;

## あまりに力づくのでお見せするのもいやなのですが、、、

(defvar isearch-mode-mw32-ime nil)

(defadvice isearch-mode (before get-fep-mode activate)
  (setq isearch-mode-mw32-ime (fep-get-mode)))

(defadvice isearch-update (before fep-set-off activate)
  (if isearch-mode-mw32-ime
	 (progn
	   (sit-for 0)
	   (fep-force-off))))

(defadvice isearch-done (after put-fep-mode activate)
  (if isearch-mode-mw32-ime
	 (progn
	   (sit-for 0)
	   (fep-force-off)
	   (sit-for 0)
	   (fep-force-on))))

(defadvice isearch-cancel (before put-fep-mode activate)
  (if isearch-mode-mw32-ime
	 (progn
	   (sit-for 0)
	   (fep-force-off)
	   (sit-for 0)
	   (fep-force-on))))

で、2回目以降の検索は大丈夫なのですが、Meadow を立ち上げて、最初
に IME ON の状態で isearch するときだけ 1文字目を入力したところ
で抜けてしまいます。なんだか全然わかりません。なんか event がで
ているように感じるのですが。。。

深川> 追伸
深川> >> Wed, 06 Oct 1999 19:56:31 +0900
深川> >> Hideyuki SHIRAI (白井秀行) さんへ
深川> >> 【お返事】Re: to use browse-yank.el
深川> 
深川> 白井> 白井秀行＠これでとりあえず満足。:-)
深川> 
深川> さっくり、いただきました (^^)

    (delete-window)

のところを

    (and (not (one-window-p t))
	 (delete-window))

にするともう少し満足度が上がります。


噎啣囑囓嗾噬嚆嗷哢嚠侑> 螢鐃噪喞

-- 
白井秀行 (mailto:shirai@xxxxxxxxxxxxxxxxxxx)