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))

Reply via email to