Commit 1598de6e authored by Juri Linkov's avatar Juri Linkov

* lisp/tab-line.el (tab-line-tab-name): Try to use truncate-string-to-width.

parent 5458493d
Pipeline #3041 failed with stage
in 7 minutes and 37 seconds
......@@ -126,8 +126,8 @@ Reduce tab width proportionally to space taken by other tabs."
(max 1 (- (/ (window-width) (length buffers)) 3)))))
(if (or (not limit) (< (length tab-name) limit))
(propertize (concat tab-line-tab-name-ellipsis
(substring tab-name (- limit)))
(propertize (truncate-string-to-width tab-name limit nil nil
'help-echo tab-name))))
(defvar tab-line-tabs-limit 15
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment