Emacs 构建 Tabbar


;;;;;;;;;;;;;;;;;;;;; tabbar ;;;;;;;;;;;;;;;;;;;;;;;;;;
(require ‘tabbar)
(tabbar-mode 1)
(global-set-key [(meta j)] ‘tabbar-forward)
(global-set-key [(meta k)] ‘tabbar-backward)

(set-face-attribute ‘tabbar-default nil
                    :background "gray"
                    :foreground "gray")
(set-face-attribute ‘tabbar-selected nil
                    :inherit ‘tabbar-default
                    :background "lightblue"
                    :box ‘(:line-width 1 :color "lightblack") )
(set-face-attribute ‘tabbar-unselected nil
                    :inherit ‘tabbar-default
                    :box ‘(:line-width 1 :color "gray"))

(custom-set-variables ‘(tabbar-separator (quote (1.5))))


效果:

技术分享

郑重声明:本站内容如果来自互联网及其他传播媒体,其版权均属原媒体及文章作者所有。转载目的在于传递更多信息及用于网络分享,并不代表本站赞同其观点和对其真实性负责,也不构成任何其他建议。