ここのサイトからtabbar.elを自分のライブラリフォルダにダウンロードする。
落合研の人ならemacslibフォルダ。
そして以下を.emacs.elに書き込む。
;; tabbar.el------------------------------------------ ;; scratch buffer 以外をまとめてタブに表示する (require 'cl) ; for emacs-22.0.50 on Vine Linux 4.2 (when (require 'tabbar nil t) (setq tabbar-buffer-groups-function (lambda (b) (list "All Buffers"))) (setq tabbar-buffer-list-function (lambda () (remove-if (lambda(buffer) (find (aref (buffer-name buffer) 0) " *")) (buffer-list)))) (tabbar-mode)) ;;M-]で次のタブ、M-[で前のタブに移動 (global-set-key "\M-]" 'tabbar-forward) (global-set-key "\M-[" 'tabbar-backward) ;; 外観変更 (set-face-attribute 'tabbar-default-face nil :background "#585555") (set-face-attribute 'tabbar-unselected-face nil :background "gray85" :foreground "black" :box '(:line-width 2 :color "white" :style pressed-button)) (set-face-attribute 'tabbar-selected-face nil :background "white" :foreground "black" :box '(:line-width 2 :color "red" :style released-button)) (set-face-attribute 'tabbar-button-face nil :box '(:line-width 6 :color "gray72" :style released-button)) (set-face-attribute 'tabbar-separator-face nil :height 0.7) ;; M-4 で タブ表示、非表示 (global-set-key "\M-4" 'tabbar-mode)
色なんかは自分のお好みで値を設定してください。
0 件のコメント :
コメントを投稿