[elpa] externals/org-modern 27682750d1 4/6: Convert block name to lowercase before lookup

[ELPA Syncer]

branch: externals/org-modern
commit 27682750d1f284994526fcfd6c0b99745ca7dee4
Author: TEC <g...@tecosaur.net>
Commit: Daniel Mendler <m...@daniel-mendler.de>

    Convert block name 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 3feb33ed7d..5a0bfb6358 100644
--- a/org-modern.el
+++ b/org-modern.el
@@ -324,7 +324,7 @@ You can specify a font `:family'. The font families 
`Iosevka', `Hack' and
         (beg-name (match-beginning 3))
         (end (match-end 3))
         (end-rep (match-end 3))
-        (rep (assoc (match-string 3) org-modern-block-name)))
+        (rep (assoc (downcase (match-string 3)) org-modern-block-name)))
     (unless rep
       (setq rep (assq t org-modern-block-name)
             end-rep beg-name))