[Date Prev][Date Next][Thread Prev][][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)
-- 
有沢 明宏