Java API のドキュメントを開いて移動。改。

どーもーです。(結構気に入った)


my-jde-help-class 間違ってたよ。
中で使っている,goto-buffer-window 関数は,yatexlib についてくる関数だった。
調べていたとき,関数の動作ばかりに目がいって,
どのファイルで定義されているかには,目がいかなかった,
というのがそのいいわけ。てへ。
こんだー,関数がないぜ! そこのおじさん! って怒られなくて済むよ。ほっ。

(defun my-jde-help-class ()
  (interactive)
  (let (b class-name)
    (walk-windows '(lambda (w)
                     (unless b
                       (save-excursion
                         (set-buffer (window-buffer w))
                         (if (eq major-mode 'w3m-mode)
                             (setq b (window-buffer w)))))))
    (setq class-name (read-from-minibuffer "Class: " (thing-at-point 'symbol)))
    (if b
        ;; 現在のスクリーン内に *w3m* バッファがあればそこへ移動
        (select-window (get-buffer-window b))
        ;; なければ,他のスクリーンも含めて探す
      (elscreen-find-and-goto-by-buffer (get-buffer "*w3m*") t nil))
    (jde-help-class class-name)))