[elpa] externals/beframe 3ae1773a4d 03/10: Add helper functions for the consolidated buffer list

[ELPA Syncer]

branch: externals/beframe
commit 3ae1773a4d7a243812359f4e2460fcaac393be91
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Add helper functions for the consolidated buffer list
---
 beframe.el | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/beframe.el b/beframe.el
index e13fde3af5..cb72d9cc51 100644
--- a/beframe.el
+++ b/beframe.el
@@ -135,6 +135,16 @@ Include `beframe-global-buffers' in the list."
                   (append (beframe--frame-buffers frame)
                           (beframe--global-buffers))))))
 
+(defun beframe--buffer-list-consolidated ()
+  "Return list of buffers from all frames.
+This is the same as the output of the `buffer-list' function
+minus all the internal buffers."
+  (seq-filter
+   (lambda (buf)
+     (and (bufferp buf)
+          (not (string-prefix-p " " (buffer-name buf)))))
+   (buffer-list)))
+
 (define-obsolete-function-alias
   'beframe--buffer-list
   'beframe-buffer-list
@@ -150,6 +160,13 @@ more information."
      (buffer-name buf))
    (beframe-buffer-list frame :sort sort)))
 
+(defun beframe--buffer-names-consolidated ()
+  "Return list of names of all buffers as strings."
+  (mapcar
+   (lambda (buf)
+     (buffer-name buf))
+   (beframe--buffer-list-consolidated)))
+
 (define-obsolete-function-alias
   'beframe--buffer-names
   'beframe-buffer-names