Mu4e: Remove (now-)unused header colourise func

This commit is contained in:
TEC 2020-10-14 17:49:16 +08:00
parent 6490565404
commit 42ee991f4a
No known key found for this signature in database
GPG key ID: 779591AFDB81F06C

View file

@ -123,14 +123,6 @@ will also be the width of all other printable characters."
mu4e-headers-signed-mark (cons "s" (+mu4e-normalised-icon "certificate" :height 0.7 :color "dpurple"))
mu4e-headers-unread-mark (cons "u" (+mu4e-normalised-icon "eye-slash" :v-adjust 0.05))))
;;;###autoload
(defun +mu4e-header-colorize (str)
(let* ((str-sum (apply #'+ (mapcar (lambda (c) (% c 3)) str)))
(color (nth (% str-sum (length +mu4e-header-colorized-faces))
+mu4e-header-colorized-faces)))
(put-text-property 0 (length str) 'face color str)
str))
;;;###autoload
(defun +mu4e-colorize-str (str &optional unique herring)
"Apply a face from `+mu4e-header-colorized-faces' to STR.