branch: elpa/telephone-line
commit c0363af1662ce8241a2cc15bdeb26c70e0ca012a
Author: Daniel Bordak <[email protected]>
Commit: Daniel Bordak <[email protected]>
Add height to the hash key to automatically handle font size changes
---
telephone-line-utils.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/telephone-line-utils.el b/telephone-line-utils.el
index f7fed7c5db..198c91ba3e 100644
--- a/telephone-line-utils.el
+++ b/telephone-line-utils.el
@@ -220,7 +220,8 @@ Includes padding."
(cl-defmethod telephone-line-separator-render-image ((obj
telephone-line-separator) foreground background)
"Find cached pbm of OBJ in FOREGROUND and BACKGROUND.
If it doesn't exist, create and cache it."
- (let ((hash-key (concat background "_" foreground)))
+ (let* ((height (telephone-line-separator-height obj))
+ (hash-key (format "%s_%s_%s" background foreground height)))
;; Return cached image if we have it.
(or (gethash hash-key (oref obj image-cache))
(puthash hash-key
