added persp-list-buffers function

1 files changed, 6 insertions, 0 deletions

diff --git a/perspective.el b/perspective.el
index 177f1e2..8147a09 100644
--- a/perspective.el
+++ b/perspective.el
@@ -826,6 +826,12 @@ Prefers perspectives in the selected frame."
           (persp-switch (cdr other-persp)))
         (switch-to-buffer buffer)))))
 
+(defun persp-list-buffers ()
+  "Like the default C-x C-b, but filters for the current perspective's buffers."
+  (interactive)
+  (switch-to-buffer
+   (list-buffers-noselect nil (seq-filter 'buffer-live-p (persp-current-buffers)))))
+
 (defun persp-remove-buffer (buffer)
   "Disassociate BUFFER with the current perspective.