diff options
author | Juri Linkov <juri@linkov.net> | 2021-12-30 10:08:37 +0200 |
---|---|---|
committer | Juri Linkov <juri@linkov.net> | 2021-12-30 10:08:37 +0200 |
commit | d1c7ce68ba91129124b4869b15df97c63fa3d4cb (patch) | |
tree | 185bb423c01c25006ac048e73fe336307b07cbdc /lisp | |
parent | 37ad776b9e6c90b2c289dd2413868066608594a7 (diff) | |
download | emacs-d1c7ce68ba91129124b4869b15df97c63fa3d4cb.tar.gz emacs-d1c7ce68ba91129124b4869b15df97c63fa3d4cb.tar.bz2 emacs-d1c7ce68ba91129124b4869b15df97c63fa3d4cb.zip |
* lisp/tab-line.el (tab-line-tab-name-format-default): Add help-echo.
(bug#52889)
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/tab-line.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/tab-line.el b/lisp/tab-line.el index af0647acf7c..003bfe1fbe3 100644 --- a/lisp/tab-line.el +++ b/lisp/tab-line.el @@ -495,6 +495,8 @@ which the tab will represent." (apply 'propertize (concat (propertize name 'keymap tab-line-tab-map + 'help-echo (if selected-p "Current tab" + "Click to select tab") ;; Don't turn mouse-1 into mouse-2 (bug#49247) 'follow-link 'ignore) (or (and (or buffer-p (assq 'buffer tab) (assq 'close tab)) |