自定义 tabbar-buffer-groups-function 无效

自定义 tabbar-buffer-groups-function 无效

我想设置这样的标签方案:

  • “irc”标签组中所有与 IRC 相关的缓冲区
  • 所有 dired 缓冲区和 Emacs 内部缓冲区,如“emacs”中的*scratch*/*messages*
  • “用户”中的所有其他缓冲区

我已经配置了我的.emacs为此,但我的自定义 tabbar-buffer-groups 函数没有效果。标签组的行为就像默认行为一样,就像我没有编写此函数一样。我做错了什么?

答案1

啊,(setq ... (lambda ...应该是(defun tabbar-buffer-groups () ...

答案2

尝试这个:

(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")
     )))

(我从未在 emacs 中使用过 irc,所以我不确定)。

相关内容