如何在Emacs中获取当前缓冲区数(不包括内部缓冲区)?
我有这个,但是看起来很复杂
;; number of buffers excluding internal buffers
(apply '+ (mapcar
(lambda (b)
(if (or (buffer-file-name b)
(not (string-equal (substring (buffer-name b) 0 1) " ")))
1 0))
(buffer-list)))
它的作用是计算正在访问文件或名称不以空格开头的缓冲区。
我只想将缓冲区的数量添加到框架标题中。
我不知道执行此操作的单个函数,但是这是简化的代码:
(cl-count-if
(lambda (b)
(or (buffer-file-name b)
(not (string-match "^ " (buffer-name b)))))
(buffer-list))
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句