emacs - 获取 Emacs 中的缓冲区数

Question

如何在 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)))

它的作用是计算正在访问文件或访问文件的缓冲区
名称不以空格开头。

我只想将缓冲区的数量添加到帧标题中。

Answer 1

我不知道有一个函数可以做到这一点，但这是你的
代码，简化:

(cl-count-if
 (lambda (b)
   (or (buffer-file-name b)
       (not (string-match "^ " (buffer-name b)))))
 (buffer-list))