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

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

[elpa] externals/org-modern c01d9978c7 5/7: Rename function


From: ELPA Syncer
Subject: [elpa] externals/org-modern c01d9978c7 5/7: Rename function
Date: Fri, 3 Jun 2022 12:57:50 -0400 (EDT)

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

    Rename function
---
 org-modern.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/org-modern.el b/org-modern.el
index 5c61340dfb..6a852b3301 100644
--- a/org-modern.el
+++ b/org-modern.el
@@ -297,7 +297,7 @@ You can specify a font `:family'. The font families 
`Iosevka', `Hack' and
 (defvar-local org-modern--keywords nil
   "List of font lock keywords.")
 
-(defun org-modern--block ()
+(defun org-modern--block-name ()
   "Prettify block according to `org-modern-block-name'."
   (let ((beg (match-beginning 1))
         (beg-name (match-beginning 2))
@@ -603,7 +603,7 @@ You can specify a font `:family'. The font families 
`Iosevka', `Hack' and
                         (2 'org-modern-block-name append))))
                    ((and (consp org-modern-block-name) ; dynamic replacement
                          (consp (car org-modern-block-name)))
-                    '(((0 (org-modern--block))) . ((0 
(org-modern--block))))))))
+                    '(((0 (org-modern--block-name))) . ((0 
(org-modern--block-name))))))))
         `(("^[ \t]*\\(#\\+\\(?:begin\\|BEGIN\\)_\\)\\(\\S-+\\).*"
            ,@(car block-specs))
           ("^[ \t]*\\(#\\+\\(?:end\\|END\\)_\\)\\(\\S-+\\).*"



reply via email to

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