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

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

[elpa] externals/org-modern a0172a06a6: Minor cleanup


From: ELPA Syncer
Subject: [elpa] externals/org-modern a0172a06a6: Minor cleanup
Date: Fri, 11 Mar 2022 11:57:38 -0500 (EST)

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

    Minor cleanup
---
 README.org    | 1 +
 org-modern.el | 6 +++---
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/README.org b/README.org
index 2ee1c77c48..9b1727822f 100644
--- a/README.org
+++ b/README.org
@@ -92,6 +92,7 @@ screenshot above.
         org-auto-align-tags nil
         org-tags-column 0
         org-ellipsis "…"
+        org-agenda-block-separator ?─
         org-catch-invisible-edits 'show-and-error
         org-special-ctrl-a/e t
         org-insert-heading-respect-content t)
diff --git a/org-modern.el b/org-modern.el
index 75cc56ca8e..c56f6fd196 100644
--- a/org-modern.el
+++ b/org-modern.el
@@ -301,8 +301,7 @@ Set to nil to disable the indicator."
     (put-text-property
      beg end
      'face
-     (if (member todo (or org-done-keywords
-                          org-done-keywords-for-agenda))
+     (if (member todo org-done-keywords)
          'org-modern-done
        'org-modern-todo))))
 
@@ -524,7 +523,8 @@ Set to nil to disable the indicator."
       (let ((re (format " %s "
                         (regexp-opt
                          (append org-todo-keywords-for-agenda
-                                 org-done-keywords-for-agenda) t))))
+                                 org-done-keywords-for-agenda) t)))
+            (org-done-keywords org-done-keywords-for-agenda))
         (while (re-search-forward re nil 'noerror)
           (org-modern--todo))))))
 



reply via email to

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