tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

Allow tags containing capital letters in org-agenda-filter 

* lisp/org-agenda.el (org-agenda-filter): Downcase tags in the search
string provided by user.  This is needed because all the tags stored
in 'tags text property are downcased.

Example when old code did not work is a tag like COMMON.  The user
would not expect a need to input +|-common in the agenda filter
instead of +|-COMMON.  The latter would only result in
"COMMON filter ignored because tag/category is not represented".
This commit is contained in:
Ihor Radchenko 2021-02-11 12:03:15 +08:00 committed by Kyle Meyer
parent 61336f80dc
commit 75ccb9719f
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/org-agenda.el
View File

@ -7767,8 +7767,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))