[MD:2951]w32-focus-frame vs x-focus-frame

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

# そうだ、ちゃんと言うのを忘れていた。。。

(select-frame-set-input-focus (selected-frame))
=>
Debugger entered--Lisp error: (void-function w32-focus-frame)
  w32-focus-frame(...
  select-frame-set-input-focus(...
  eval((select-frame-set-input-focus (selected-frame)))

となります。frame.el で

(defun select-frame-set-input-focus (frame)
  "Select FRAME, raise it, and set input focus, if possible."
    (select-frame frame)
    (raise-frame frame)
    ;; Ensure, if possible, that frame gets input focus.
    (when (eq window-system 'w32) <= ここね
      (w32-focus-frame frame))
    (cond (focus-follows-mouse
	   (unless (eq window-system 'w32)
	     (set-mouse-position (selected-frame) (1- (frame-width)) 0)))
	  (t
	   (when (eq window-system 'x)
	     (x-focus-frame frame)))))

だから。

mw32fns.c で以前は w32-focus-frame を定義していたのが、1.99 は
x-focus-frame になったからだけど、どうするのが正解かはわかりませ
ん。

# select-frame-by-name() にもこういうのがあります。


P.S.
今日、昼休み中ずっと、1.99 + Tamago をやっていたけど落ちなかった。
昨日は何回か落ちたのだけど。


P.P.S
ime-font の設定が効かないような気がする。14dot にならない。。。
himi さんのサンプルの windows-16 をまねしたのだけど、設定を勘違
いしているだけかな？

'(ime-font . "windows-14-japanese-jisx0208")
'(font . "windows-14")

な感じじゃだめ？

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