* lisp/tab-bar.el (tab-bar-get-buffer-tab): Use 'remq' instead of 'seq-remove'

diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el
index e30a5c44119f4673043c9a809625e3c1480e74e2..2684ff998b7f06e7a57dc25197a9882382ad1037 100644 (file)
--- 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