[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/rcirc-color 46752a1354 3/4: * rcirc-color.el (rcirc-col
From: |
Philip Kaludercic |
Subject: |
[elpa] externals/rcirc-color 46752a1354 3/4: * rcirc-color.el (rcirc-color--facify): Always use 'rcirc-colors' |
Date: |
Tue, 4 Oct 2022 14:04:03 -0400 (EDT) |
branch: externals/rcirc-color
commit 46752a135451dfd8fb16453efc281e8efc77ce15
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>
* rcirc-color.el (rcirc-color--facify): Always use 'rcirc-colors'
---
rcirc-color.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/rcirc-color.el b/rcirc-color.el
index bd76c5576d..1f61cb8ac1 100644
--- a/rcirc-color.el
+++ b/rcirc-color.el
@@ -113,7 +113,9 @@ Example: (setq rcirc-color-other-attributes \\='(:weight
bold))"
(puthash (substring-no-properties string)
`(:foreground
,(if rcirc-color-is-deterministic
- (concat "#" (substring (md5 string) 0 12))
+ (nth (mod (string-to-number (md5 string)
16)
+ (length rcirc-colors))
+ rcirc-colors)
(elt rcirc-colors
(random (length rcirc-colors))))
,@rcirc-color-other-attributes)