emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org-modern 231462883c 4/7: Minor fixes


From: ELPA Syncer
Subject: [elpa] externals/org-modern 231462883c 4/7: Minor fixes
Date: Fri, 3 Jun 2022 12:57:50 -0400 (EDT)

branch: externals/org-modern
commit 231462883ccb4ac98804f81d1a47a43328ba3c46
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Minor fixes
---
 org-modern.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/org-modern.el b/org-modern.el
index 1127558e02..5c61340dfb 100644
--- a/org-modern.el
+++ b/org-modern.el
@@ -303,9 +303,9 @@ You can specify a font `:family'. The font families 
`Iosevka', `Hack' and
         (beg-name (match-beginning 2))
         (end (match-end 2))
         (end-rep (match-end 2))
-        (rep (assoc (match-string 2) org-modern-block)))
+        (rep (assoc (match-string 2) org-modern-block-name)))
     (unless rep
-      (setq rep (assq t org-modern-block)
+      (setq rep (assq t org-modern-block-name)
             end-rep beg-name))
     (when (consp (cdr rep))
       (setcdr rep (if (= 7 (length (match-string 1))) (cadr rep) (caddr rep))))
@@ -315,7 +315,7 @@ You can specify a font `:family'. The font families 
`Iosevka', `Hack' and
        (add-face-text-property beg-name end 'org-modern-block-name 'append))
       ((pred stringp)
        (put-text-property beg end-rep 'display
-                          (propertize replacement 'face 
'org-modern-symbol))))))
+                          (propertize rep 'face 'org-modern-symbol))))))
 
 (defun org-modern--checkbox ()
   "Prettify checkboxes according to `org-modern-checkbox'."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]