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

[xyzzy:07775] Re: バッファタブの表示 / 非表示



日江さん、こんにちは。OHKUBO Hiroshi です。

> バッファタブ(表示->ツールバー->バッファ)の表示/非
> 表示をメニューからでなく、Lisp で制御するにはどうし
> たらよいのでしょう。
2ch-mode の場合は xyzzy/.2ch/config.l に

;; 起動時に buffer-bar を消し、終了時に復活させる
(defun my-2ch-start-hook ()
  (hide-tool-bar 'buffer-bar))
(defun my-2ch-exit-hook ()
  (show-tool-bar 'buffer-bar))
(add-hook '*2ch-start-hook* 'my-2ch-start-hook)
(add-hook '*2ch-exit-hook* 'my-2ch-exit-hook)

と記述しておけば望みの効果が得られると思います。
ただし、2ch-mode を終了するまで buffer-bar は表示されないため、
2ch-mode を起動したまま frame を変更した場合は buffer-bar は
非表示のままです。

# 余談ですが、hook に引っかける function 名を hogehoge-hook にするのは
# おかしいでしょうか?
# lisp の流儀がわからなくいつも右往左往しています。
---
OHKUBO Hiroshi
konata_o@xxxxxxxxxxx
http://members.tripod.co.jp/ohkubo/xyzzy/index.html

Index Home