emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 7a14f60b90e: * lisp/tab-bar.el (tab-bar-tab-group-format-default)


From: Juri Linkov
Subject: master 7a14f60b90e: * lisp/tab-bar.el (tab-bar-tab-group-format-default): Hide hints.
Date: Mon, 5 Aug 2024 02:58:24 -0400 (EDT)

branch: master
commit 7a14f60b90ea640087b759466f2e2bafa490699d
Author: Juri Linkov <juri@linkov.net>
Commit: Juri Linkov <juri@linkov.net>

    * lisp/tab-bar.el (tab-bar-tab-group-format-default): Hide hints.
    
    Don't display hints when tab-bar-show-inactive-group-tabs is customized
    to t (bug#71939).  Suggested by Ship Mints <shipmints@gmail.com>.
---
 lisp/tab-bar.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el
index b9726459b51..0ac31727ef4 100644
--- a/lisp/tab-bar.el
+++ b/lisp/tab-bar.el
@@ -1017,7 +1017,10 @@ It should return the formatted tab group name to display 
in the tab bar."
 
 (defun tab-bar-tab-group-format-default (tab i &optional current-p)
   (propertize
-   (concat (if (and tab-bar-tab-hints (not current-p)) (format "%d " i) "")
+   (concat (if (and tab-bar-tab-hints
+                    (not current-p)
+                    (not tab-bar-show-inactive-group-tabs))
+               (format "%d " i) "")
            (funcall tab-bar-tab-group-function tab))
    'face (if current-p 'tab-bar-tab-group-current 
'tab-bar-tab-group-inactive)))
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]