manateelazycat / awesome-tab

Emacs package to provide out-of-the-box configuration to use tabs.
383 stars 38 forks source link

支持perspective #119

Open archcst opened 6 months ago

archcst commented 6 months ago

Hi manateelazycat,

我使用 perspective 来在多个frame中显示独立的buffer清单,目前可以在不同的frame中看到switch-to-buffer中的buffer清单是不同的,但是awesome-tab显示还是相同的。

我尝试了这段代码:

(eval-after-load "awesome-tab"
  '(defun awesome-tab-buffer-list ()
     "Override buffer list with perspective."
     (awesome-tab-filter-out
      'awesome-tab-hide-tab-cached
      (delq nil
            (mapcar #'(lambda (b)
                        (cond
                         ;; Always include the current buffer.
                         ((eq (current-buffer) b) b)
                         ((buffer-file-name b) b)
                         ((char-equal ?\  (aref (buffer-name b) 0)) nil)
                         ((buffer-live-p b) b)))
                    (persp-list-buffers)))))) ;; 本来是 (buffer-list),尝试过(persp-buffers)、(persp-get-buffers)

得到的结果是tab栏被清空了:

image

请问怎么修改?

manateelazycat commented 5 months ago

我现在主要用sort-tab,awesome-tab喔很少再改代码了,主要是没有时间,抱歉。

但是欢迎发送补丁,我还是乐于合并的。