mu4e-main: use string-width' over length'
Better for utf-8 but still difficult to align due to non-monospaced characters.
This commit is contained in:
committed by
Dirk-Jan C. Binnema
parent
d68c0fd5b5
commit
3ea1784aad
@ -146,7 +146,7 @@ clicked."
|
||||
(count (plist-get (car qcounts) :count)))
|
||||
(format
|
||||
"%s (%s/%s)"
|
||||
(make-string (- longest (length name)) ? )
|
||||
(make-string (- longest (string-width name)) ? )
|
||||
(propertize (number-to-string unread)
|
||||
'face 'mu4e-header-key-face)
|
||||
count))
|
||||
@ -183,7 +183,7 @@ clicked."
|
||||
(count (plist-get (car qcounts) :count)))
|
||||
(format
|
||||
"%s (%s/%s)"
|
||||
(make-string (- longest (length name)) ? )
|
||||
(make-string (- longest (string-width name)) ? )
|
||||
(propertize (number-to-string unread)
|
||||
'face 'mu4e-header-key-face)
|
||||
count))
|
||||
|
||||
@ -866,7 +866,7 @@ This is meant to be the exact same data structure as
|
||||
"Return the length of longest name of bookmarks and maildirs."
|
||||
(cl-loop for b in (append (mu4e-bookmarks)
|
||||
(mu4e~maildirs-with-query))
|
||||
maximize (length (plist-get b :name))))
|
||||
maximize (string-width (plist-get b :name))))
|
||||
|
||||
|
||||
;;; Indexing & Updating
|
||||
|
||||
Reference in New Issue
Block a user