Ah, (setq ... (lambda ...
deve ser (defun tabbar-buffer-groups () ...
Eu quero configurar um esquema de guias como este:
*scratch*
/ *messages*
em "emacs" Eu configurei meus .emacs para isso, mas meu buffer de tabbar personalizado -groups-function não tem efeito. Os grupos de guias estão se comportando como padrões, como se eu não tivesse escrito essa função. O que estou fazendo errado?
Ah, (setq ... (lambda ...
deve ser (defun tabbar-buffer-groups () ...
Tente isto:
(defun tabbar-buffer-groups-common ()
"Returns the list of group names the current buffer belongs to."
(list
(cond
((string-equal "*" (substring (buffer-name) 0 1))
"emacs"
)
((string-match "irc" (format "%s" major-mode))
"irc"
)
(t
"user")
)))
(Eu nunca usei o irc no emacs, então não tenho certeza sobre isso).