[elpa] externals/beframe b12ab27542 05/10: Add command to assume buffers from the consolidated buffer list

[ELPA Syncer]

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

    Add command to assume buffers from the consolidated buffer list
---
 beframe.el | 21 +++++++++++++++++++--
 1 file changed, 19 insertions(+), 2 deletions(-)

diff --git a/beframe.el b/beframe.el
index a92b9d248d..719bf00ab5 100644
--- a/beframe.el
+++ b/beframe.el
@@ -392,10 +392,17 @@ Also see `beframe-assume-frame-buffers',
 (defun beframe--buffer-list-prompt-crm (&optional frame)
   "Select one or more buffers in FRAME separated by `crm-separator'.
 Optional FRAME argument is an object that satisfies `framep'.  If
-FRAME is nil, the current frame is used."
+FRAME is nil, the current frame is used.  If FRAME is non-nil but
+not a frame object, treat it as a flag for the consolidated
+buffer list (buffers from all frames)."
   (completing-read-multiple
    "Select buffers: "
-   (beframe-buffer-names frame)
+   (cond
+    ((framep frame)
+     (beframe-buffer-names frame))
+    (frame
+     (beframe--buffer-names-consolidated))
+    (t (beframe-buffer-names)))
    nil
    :require-match))
 
@@ -421,6 +428,16 @@ Also see `beframe-assume-frame-buffers',
 (defalias 'beframe-add-buffers 'beframe-assume-buffers
   "Alias of `beframe-assume-buffers' command.")
 
+;;;###autoload
+(defun beframe-assume-buffers-all-frames ()
+  "Like `beframe-assume-buffers' but for the consolidated buffer list (all 
frames)."
+  (declare (interactive-only t))
+  (interactive)
+  (beframe--assume
+   (beframe--buffers-name-to-objects
+    (beframe--buffer-list-prompt-crm
+     :all-frames))))
+
 ;;;###autoload
 (defun beframe-unassume-buffers (buffers)
   "Unassume BUFFERS from the current frame's buffer list.