[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/buttercup 6a1a678ca7 1/2: Use assq in buttercup-colorize
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/buttercup 6a1a678ca7 1/2: Use assq in buttercup-colorize |
Date: |
Sun, 4 Dec 2022 18:58:25 -0500 (EST) |
branch: elpa/buttercup
commit 6a1a678ca76a525e6f9f34c5f2c8d9a1e11308b3
Author: Ola Nilsson <ola.nilsson@gmail.com>
Commit: Ola Nilsson <ola.nilsson@gmail.com>
Use assq in buttercup-colorize
---
buttercup.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/buttercup.el b/buttercup.el
index 6c773ee7f5..2fdcbdca8f 100644
--- a/buttercup.el
+++ b/buttercup.el
@@ -1929,7 +1929,7 @@ the capturing behavior."
"Format STRING with COLOR.
Return STRING unmodified if COLOR is nil."
(if color
- (let ((color-code (cdr (assoc color buttercup-colors))))
+ (let ((color-code (cdr (assq color buttercup-colors))))
(format "\e[%sm%s\e[0m" color-code string))
string))