window-minibuffer-p

[Mikio Nakajima]

window-minibuffer-p を poe-18.el に入れたいのですが、Basic editing
commands の個所で良いでしょうか？  問題なければ commit します。

(defun-maybe window-minibuffer-p (&optional window)
"Return non-nil if WINDOW is a minibuffer window."
  (eq (or window (selected-window)) (minibuffer-window)))

-- 
中島幹夫 <minakaji ＠ osaka.email.ne.jp>
　　　　 <minakaji ＠ pdx.ne.jp> (急ぎのときはこちらへ)
http://www.asahi-net.or.jp/~gy2m-nkjm/