[Date Prev][Date Next][Thread Prev][][Date Index][Thread Index]

Re: Cannot open load file: cl



To:Developer in Japanese

ども、長です。

2007/5/16, Katsumi Yamaoka <yamaoka@xxxxxxx>:
> I'm sorry to follow up so late.

> I've modified the `w3m-switch-to-buffer' function in the CVS
> trunk so that it works just like `switch-to-buffer'.  Could you
> try it?

あー、フォローありがとうございます。
英語無脳のため、なにがなんだかわからなくなっちゃてたもので。

あと、このことでコード追っ掛けてたら以下の部分
(defun w3m-switch-to-buffer (&optional buffer norecord)
  "Run `switch-to-buffer' and redisplay the header-line."
  (interactive)
  (prog1
      (if (interactive-p)
	  (if iswitchb-mode
	      (call-interactively 'iswitchb-buffer)
	    (call-interactively 'switch-to-buffer))
	(switch-to-buffer buffer norecord))
    (when (and header-line-format
	       (eq major-mode 'w3m-mode))
      (w3m-force-window-update))))

(defun w3m-subst-switch-to-buffer-keys ()
  "Substitute keys for `switch-to-buffer' with `w3m-switch-to-buffer'."
  (substitute-key-definition 'switch-to-buffer 'w3m-switch-to-buffer
			     w3m-mode-map global-map))

ですが、iswitchbを導入していてemacs-w3mより先に(iswitchb-default-keybindings)
を実行していると、switch-to-bufferがiswitchb-bufferに置き換えられているため、
global-mapでw3m-switch-to-bufferが設定されないようです。

なので、
(defun w3m-subst-switch-to-buffer-keys ()
  "Substitute keys for `switch-to-buffer' with `w3m-switch-to-buffer'."
  (if iswitchb-mode
      (substitute-key-definition 'iswitchb-buffer 'w3m-switch-to-buffer
				 w3m-mode-map global-map)
    (substitute-key-definition 'switch-to-buffer 'w3m-switch-to-buffer
			       w3m-mode-map global-map)))

としたらよいのではないかと思いますが、どうでしょう。

# いまちょっと確認作業他がよろしくない環境なので、どなたかおねがいできますか?

以上です。