branch: externals/beframe
commit a04e8dca103780f82a90b86741c71302869af743
Author: Protesilaos Stavrou <[email protected]>
Commit: Protesilaos Stavrou <[email protected]>
Make stylistic change to beframe-buffer-list
---
beframe.el | 11 ++++++-----
1 file changed, 6 insertions(+), 5 deletions(-)
diff --git a/beframe.el b/beframe.el
index 0ffdee4601..396c112c2a 100644
--- a/beframe.el
+++ b/beframe.el
@@ -256,11 +256,12 @@ for example, be used to prefer hidden buffers to visible
ones—see
`beframe-buffer-sort-visibility'.
Include `beframe-global-buffers' in the list."
- (funcall (or sort #'identity)
- (delq nil
- (delete-dups
- (append (beframe--get-buffers frame)
- (beframe--global-buffers))))))
+ (let ((buffers (seq-union
+ (beframe--get-buffers frame)
+ (beframe--global-buffers))))
+ (if sort
+ (funcall sort buffers)
+ buffers)))
(define-obsolete-function-alias
'beframe--buffer-list