gpt4 book ai didi

Emacs 每帧制作 ibuffer 过滤器

转载 作者:行者123 更新时间:2023-12-02 21:44:03 28 4
gpt4 key购买 nike

我使用ibuffer并且打开了几个框架。我的 ibuffer 最常见的用例是按名称/文件名过滤缓冲区列表 (C-x C-b)。问题是过滤器对所有帧都以相同的方式工作(我相信这是预测的)。我希望必须对每个帧的 ibuffer 列表应用过滤器。

例如在第一帧中,我希望看到按文件名过滤的缓冲区列表,在第二帧中按模式过滤。

环顾ibuffer.el,我发现了一个名为ibuffer-filtering-qualifiers的实体,它包含当前应用的过滤器的关联列表。我尝试过玩:

(let ((ibuffer-filtering-qualifiers '())) ;;; Imitate that there are no filters applied
(call-interactively 'ibuffer))

但这对我不起作用。

您能否指出如何实现 ibuffer 的这种预期行为?

最佳答案

函数ibuffer-update使用buffer-list,其中包括所有帧。将 ibuffer-update 从使用 buffer-list 修改为 (frame-parameter (selected-frame) 'buffer-list) 接近您的行为寻求。基于相同概念的 ibuffer 过滤器也应该是可能的。

在我看来,每帧缓冲区列表(frame-parameter (selected-frame) 'buffer-list)并不是将缓冲区与帧关联的最佳方法,因为它太容易修改。我见过的最好的方法是 Al Parker 的frame-bufs: https://github.com/alpaker/Frame-Bufs它已更新为可与当前版本的 Emacs 配合使用,但是,我正在使用稍作修改的版本来满足我自己的需要。

因此,据我所知,回答您的问题的最简单方法是使用 Al Parker 的帧缓冲区组合,并在 中使用 frame-bufs-buffer-list ibuffer-更新。这让您两全其美。下面是一个示例,它将为您提供一个很好的 ibuffer,其中仅包含与给定帧关联的缓冲区 - 所有其他缓冲区都不会显示。 [仅供引用:frame-bufs 也按模式或文件名排序。]

(require 'ibuffer)

(defalias 'ibuffer-update 'lawlist-ibuffer-update)

(defun lawlist-ibuffer-update (arg &optional silent)
"Regenerate the list of all buffers.

Prefix arg non-nil means to toggle whether buffers that match
`ibuffer-maybe-show-predicates' should be displayed.

If optional arg SILENT is non-nil, do not display progress messages."
(interactive "P")
(if arg
(setq ibuffer-display-maybe-show-predicates
(not ibuffer-display-maybe-show-predicates)))
(ibuffer-forward-line 0)
;; (let* ((bufs (buffer-list))
(let* ((bufs (frame-parameter (selected-frame) 'frame-bufs-buffer-list))
(blist (ibuffer-filter-buffers
(current-buffer)
(if (and
(cadr bufs)
(eq ibuffer-always-show-last-buffer
:nomini)
(minibufferp (cadr bufs)))
(cl-caddr bufs)
(cadr bufs))
(ibuffer-current-buffers-with-marks bufs)
ibuffer-display-maybe-show-predicates)))
(and (null blist)
(featurep 'ibuf-ext)
ibuffer-filtering-qualifiers
(message "No buffers! (note: filtering in effect)"))
(unless silent
(message "Updating buffer list..."))
(ibuffer-redisplay-engine blist arg)
(unless silent
(message "Updating buffer list...done")))
(if (eq ibuffer-shrink-to-minimum-size 'onewindow)
(ibuffer-shrink-to-fit t)
(when ibuffer-shrink-to-minimum-size
(ibuffer-shrink-to-fit)))
(ibuffer-forward-line 0)
;; I tried to update this automatically from the mode-line-process format,
;; but changing nil-ness of header-line-format while computing
;; mode-line-format is asking a bit too much it seems. --Stef
(setq header-line-format
(and ibuffer-use-header-line
ibuffer-filtering-qualifiers
ibuffer-header-line-format)))

关于Emacs 每帧制作 ibuffer 过滤器,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/19852307/

28 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com