branch: externals/bufferlo commit 636c972556cd0eefbf525f00eabac47c4ff50ba1 Author: shipmints <shipmi...@gmail.com> Commit: shipmints <shipmi...@gmail.com>
Improve mode-line lighter for tty rendering --- bufferlo.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/bufferlo.el b/bufferlo.el index a9a7762122..61e499e11a 100644 --- a/bufferlo.el +++ b/bufferlo.el @@ -467,12 +467,13 @@ Set to 0 to disable the timer. Units are whole integer seconds." "Bufferlo mode-line format to display the current active frame or tab bookmark." (when bufferlo-mode (let ((fbm (frame-parameter nil 'bufferlo-bookmark-frame-name)) - (tbm (alist-get 'bufferlo-bookmark-tab-name (tab-bar--current-tab-find)))) + (tbm (alist-get 'bufferlo-bookmark-tab-name (tab-bar--current-tab-find))) + (maybe-space (if (display-graphic-p) "" " "))) ; tty rendering can be off for Ⓕ Ⓣ (concat bufferlo-mode-line-lighter-prefix "[" - (if fbm (concat "Ⓕ " fbm)) ; the space accommodates tty rendering + (if fbm (concat "Ⓕ" maybe-space fbm)) ; the space accommodates tty rendering (if (and fbm tbm) " ") - (if tbm (concat "Ⓣ " tbm)) ; the space accommodates tty rendering + (if tbm (concat "Ⓣ" maybe-space tbm)) ; the space accommodates tty rendering "]")))) (defcustom bufferlo-mode-line-lighter '(:eval (bufferlo-mode-line-format))