Skip to content

Commit faa775f

Browse files
committed
ensure cache all
1 parent e779203 commit faa775f

File tree

1 file changed

+6
-6
lines changed

1 file changed

+6
-6
lines changed

jcs-modeline.el

Lines changed: 6 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -163,13 +163,13 @@
163163

164164
(defun jcs-modeline--char-displayable-p (str-or-char)
165165
"Check if STR-OR-CHAR is displayable."
166-
(when-let* ((char (if (stringp str-or-char)
167-
(string-to-char str-or-char)
168-
str-or-char))
169-
(result (or (gethash char jcs-modeline--char-displayable-cache)
170-
(char-displayable-p char))))
166+
(let* ((char (if (stringp str-or-char)
167+
(string-to-char str-or-char)
168+
str-or-char))
169+
(result (or (gethash char jcs-modeline--char-displayable-cache)
170+
(char-displayable-p char))))
171171
(puthash char result jcs-modeline--char-displayable-cache)
172-
str-or-char))
172+
(and result str-or-char)))
173173

174174
;; TODO: Use function `string-pixel-width' after 29.1
175175
(defun jcs-modeline--string-pixel-width (str)

0 commit comments

Comments
 (0)