diff options
author | Kyle Meyer <kyle@kyleam.com> | 2021-02-15 00:55:57 -0500 |
---|---|---|
committer | Kyle Meyer <kyle@kyleam.com> | 2021-02-15 00:55:57 -0500 |
commit | f5cfd32880379e5d9dff2152f58ea2fa2eeff8ce (patch) | |
tree | d41367ce9e34591ae03540f190b39a55718ee199 | |
parent | 885ee086dde4ec2a9e303ff101e55d55c4b2363f (diff) | |
parent | 75ccb9719fc0d6822e7e69e9d3079f884cfb96ea (diff) | |
download | org-mode-f5cfd32880379e5d9dff2152f58ea2fa2eeff8ce.tar.gz |
Merge branch 'maint'
-rw-r--r-- | lisp/org-agenda.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 3a6e4f6..9b2009f 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -7784,8 +7784,8 @@ the variable `org-agenda-auto-exclude-function'." (setq s (replace-regexp-in-string ; Remove the temporary special string. "~~~" "-" (match-string 3 f-string))) (cond - ((member s tag-list) - (add-to-list 'ft (concat pm s) 'append 'equal)) + ((member (downcase s) tag-list) + (add-to-list 'ft (concat pm (downcase s)) 'append 'equal)) ((member s category-list) (add-to-list 'fc (concat pm ; Remove temporary double quotes. (replace-regexp-in-string "\"\\(.*\\)\"" "\\1" s)) |