branch: externals/org-modern commit 63df971a82d03e9007c671de5edc5d3549f90df5 Author: Daniel Mendler <m...@daniel-mendler.de> Commit: Daniel Mendler <m...@daniel-mendler.de>
org-modern-agenda: Simplify --- org-modern.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/org-modern.el b/org-modern.el index b9e3bf4cf4..9bfd78fcc6 100644 --- a/org-modern.el +++ b/org-modern.el @@ -903,9 +903,9 @@ whole buffer; otherwise, for the line at point." (goto-char (point-min)) (while (< (point) (point-max)) (when-let ((todo (get-text-property (point) 'todo-state)) + (org-not-done-regexp (get-text-property (point) 'org-not-done-regexp)) (re (concat " \\(" todo "\\) ")) - (pos (re-search-forward re (pos-eol) 'noerror)) - (org-not-done-regexp (get-text-property (point) 'org-not-done-regexp))) + ((re-search-forward re (pos-eol) 'noerror))) (org-modern--todo)) (goto-char (min (1+ (pos-eol)) (point-max))))) (when org-modern-tag