branch: externals/consult
commit 1e0cf66a7e4d500cb7d6432c2bf863bad50a2fa0
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>
consult--frame-buffer-list: Reverse buried-buffer-list
---
consult.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/consult.el b/consult.el
index c61108f59a..55861f47f7 100644
--- a/consult.el
+++ b/consult.el
@@ -4704,8 +4704,8 @@ to search and is passed to `consult--buffer-query'."
(defun consult--frame-buffer-list ()
"List of buffers belonging to the current frame or tab."
- (nconc (copy-sequence (frame-parameter nil 'buffer-list))
- (copy-sequence (frame-parameter nil 'buried-buffer-list))))
+ (append (frame-parameter nil 'buffer-list)
+ (reverse (frame-parameter nil 'buried-buffer-list))))
(cl-defun consult--buffer-query ( &key sort directory mode as predicate
(filter t)
include (exclude consult-buffer-filter)
