[elpa] externals/org f5987b37d4: Don't reset `org-todo-keywords-for-agenda' when org-agenda-multi

[ELPA Syncer]

branch: externals/org
commit f5987b37d451c572644d2a0ffd72e682b53df237
Author: Tim Ruffing <crypto@timruffing.de>
Commit: Ihor Radchenko <yantar92@posteo.net>

    Don't reset `org-todo-keywords-for-agenda' when org-agenda-multi
    
    * org-agenda.el (org-prepare-agenda): Don't reset
    `org-todo-keywords-for-agenda' when org-agenda-multi.
    
    Fixes a bug with TODO keywords that came to light in org-modern,
    see https://github.com/minad/org-modern/issues/26.
    
    This is very similar to cd2d138883a55cad48394a3f473da8b973a99a5e,
    which fixed the same for `org-done-keywords-for-agenda` (to fix
    a similar styling issue).
    
    TINYCHANGE
---
 lisp/org-agenda.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 7e54121dcf..3da0967f04 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -3956,7 +3956,6 @@ FILTER-ALIST is an alist of filters we need to apply when
          (message "Sticky Agenda buffer, use `r' to refresh")
          (or org-agenda-multi (org-agenda-fit-window-to-buffer))
          (throw 'exit "Sticky Agenda buffer, use `r' to refresh"))
-      (setq org-todo-keywords-for-agenda nil)
       (if org-agenda-multi
          (progn
            (setq buffer-read-only nil)
@@ -3969,6 +3968,7 @@ FILTER-ALIST is an alist of filters we need to apply when
                        (make-string (window-max-chars-per-line) 
org-agenda-block-separator))
                      "\n"))
            (narrow-to-region (point) (point-max)))
+       (setq org-todo-keywords-for-agenda nil)
        (setq org-done-keywords-for-agenda nil)
        ;; Setting any org variables that are in org-agenda-local-vars
        ;; list need to be done after the prepare call