[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 9110438: * lisp/tab-bar.el (tab-bar-get-buffer-tab): Use 'remq' i
From: |
Juri Linkov |
Subject: |
master 9110438: * lisp/tab-bar.el (tab-bar-get-buffer-tab): Use 'remq' instead of 'seq-remove' |
Date: |
Sun, 12 Sep 2021 14:30:32 -0400 (EDT) |
branch: master
commit 911043845d8c0a8e67407ac80ded3bf6362bb972
Author: Juri Linkov <juri@linkov.net>
Commit: Juri Linkov <juri@linkov.net>
* lisp/tab-bar.el (tab-bar-get-buffer-tab): Use 'remq' instead of
'seq-remove'
---
lisp/tab-bar.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el
index e30a5c4..2684ff9 100644
--- a/lisp/tab-bar.el
+++ b/lisp/tab-bar.el
@@ -1945,7 +1945,7 @@ Otherwise, prefer buffers of the current tab."
(frame . ,frame)))))
(let* ((tabs (funcall tab-bar-tabs-function frame))
(current-tab (tab-bar--current-tab-find tabs)))
- (seq-remove (lambda (tab) (eq (car tab) 'current-tab)) tabs)
+ (setq tabs (remq current-tab tabs))
(if ignore-current-tab
;; Use tabs without current-tab.
tabs
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 9110438: * lisp/tab-bar.el (tab-bar-get-buffer-tab): Use 'remq' instead of 'seq-remove',
Juri Linkov <=