From: Juri Linkov <juri@linkov.net>
Date: Sun, 3 Apr 2022 16:51:46 +0000 (+0300)
Subject: * lisp/tab-bar.el (tab-bar-undo-close-tab): Update tab-bar-lines (bug#54684)
X-Git-Tag: emacs-29.0.90~1931^2~794
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c0cf923b0ad6f72eafb58057f4df245bca3da658;p=emacs.git

* lisp/tab-bar.el (tab-bar-undo-close-tab): Update tab-bar-lines (bug#54684)
---

diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el
index cf1cca4af3f..c4d450fe2a5 100644
--- a/lisp/tab-bar.el
+++ b/lisp/tab-bar.el
@@ -1659,9 +1659,10 @@ happens interactively)."
           (setq index (max 0 (min index (length tabs))))
           (cl-pushnew tab (nthcdr index tabs))
           (when (eq index 0)
-            ;; pushnew handles the head of tabs but not frame-parameter
+            ;; `pushnew' handles the head of tabs but not frame-parameter
             (tab-bar-tabs-set tabs))
-          (tab-bar-select-tab (1+ index))))
+          (tab-bar-select-tab (1+ index)))
+        (tab-bar--update-tab-bar-lines))
 
     (message "No more closed tabs to undo")))