[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master f39cd59ed47: * lisp/tab-bar.el: Fix the close button with auto-wi
From: |
Juri Linkov |
Subject: |
master f39cd59ed47: * lisp/tab-bar.el: Fix the close button with auto-width (bug#66678). |
Date: |
Sun, 22 Oct 2023 13:42:01 -0400 (EDT) |
branch: master
commit f39cd59ed477628be20353bf921b0afb423165b9
Author: Petteri Hintsanen <petterih@iki.fi>
Commit: Juri Linkov <juri@linkov.net>
* 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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master f39cd59ed47: * lisp/tab-bar.el: Fix the close button with auto-width (bug#66678).,
Juri Linkov <=