[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: bug report (w3m-bookmark-view)
>>>>> In [emacs-w3m : No.02038]
>>>>> Kiyoka Nishiyama <kiyoka@netfort.gr.jp> wrote:
> emacs -nw(ターミナルモード)で起動したEmacsで M-x w3m-bookmark-view
> を実行すると以下のようなエラーが出ます
ご報告ありがとうございます。
> 推測:
> w3m.el の以下のコードの x-focus-frameのテストに問題があるのではな
> いでしょうか?
たしかに、-nw で `x-focus-frame' を使うとエラーとなるためですね。
ということで、`x-focus-frame' の代わりに `select-frame-set-input-focus'
を使うようにして、commit しました。(幹, emacs-w3m-1_2 枝)
CVS の最新版か 1.2-rc4 に以下の patch をあててみてください。
Index: w3m.el
===================================================================
RCS file: /storage/cvsroot/emacs-w3m/w3m.el,v
retrieving revision 1.448.2.21
diff -u -r1.448.2.21 w3m.el
--- w3m.el 2001/10/31 11:27:21 1.448.2.21
+++ w3m.el 2001/11/01 18:55:05
@@ -4358,13 +4358,12 @@
(buffer (unless new-session
(w3m-alive-p)))
(focusing-function
- (append '(lambda (frame)
- (raise-frame frame)
- (select-frame frame))
- ;; `focus-frame' might not work on some environments.
- (if (fboundp 'x-focus-frame)
- '((x-focus-frame frame))
- '((focus-frame frame)))))
+ (if (fboundp 'select-frame-set-input-focus)
+ 'select-frame-set-input-focus
+ '(lambda (frame)
+ (raise-frame frame)
+ (select-frame frame)
+ (focus-frame frame))))
(params (w3m-pop-up-frame-parameters))
(popup-frame-p (w3m-popup-frame-p new-session))
window frame)
--
有沢 明宏