From f39cd59ed477628be20353bf921b0afb423165b9 Mon Sep 17 00:00:00 2001 From: Petteri Hintsanen Date: Sun, 22 Oct 2023 20:40:35 +0300 Subject: [PATCH] * lisp/tab-bar.el: Fix the close button with auto-width (bug#66678). (tab-bar-auto-width): Take into account the length of tab-bar-close-button more than one character: " x". --- lisp/tab-bar.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el index d2815c03ebf..e21367255a0 100644 --- a/lisp/tab-bar.el +++ b/lisp/tab-bar.el @@ -1227,7 +1227,9 @@ tab bar might wrap to the second line when it shouldn't.") ((< prev-width width) (let* ((space (apply #'propertize " " (text-properties-at 0 name))) - (ins-pos (- len (if close-p 1 0))) + (ins-pos (- len (if close-p + (length tab-bar-close-button) + 0))) (prev-name name)) (while continue (setq name (concat (substring name 0 ins-pos) -- 2.39.2