branch: externals/org-modern
commit 0611604e65d69ffe51db83659c917063ec9d5cde
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>
org-modern-keyword: Convert to lowercase before lookup
---
org-modern.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/org-modern.el b/org-modern.el
index f3b330b5ee..e95900041f 100644
--- a/org-modern.el
+++ b/org-modern.el
@@ -311,7 +311,7 @@ You can specify a font `:family'. The font families
`Iosevka', `Hack' and
"Prettify keywords according to `org-modern-keyword'."
(let ((beg (match-beginning 0))
(end (match-end 0))
- (rep (assoc (match-string 2) org-modern-keyword)))
+ (rep (assoc (downcase (match-string 2)) org-modern-keyword)))
(unless rep
(setq rep (assq t org-modern-keyword) end (match-end 1)))
(pcase (cdr rep)
