mirrors
/
org-mode
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git
0
0
Fork 1
Code Releases Activity

org-agenda.el (org-agenda-finalize): Downcase tags when readding them after agenda generation 

* org-agenda.el (org-agenda-finalize): Downcase tags when
readding them after agenda generation.
This commit is contained in:
Bastien Guerry 2013-01-08 11:34:09 +01:00
parent 7684fbd6a2
commit 93b0cf60e7
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/org-agenda.el
View File

@ -3580,7 +3580,8 @@ generating a new one."
(get-text-property (point) 'org-hd-marker)))
(put-text-property (point-at-bol) (point-at-eol)
'tags (org-with-point-at mrk
(delete-dups (org-get-tags-at)))))))))
(delete-dups
(mapcar 'downcase (org-get-tags-at))))))))))
(let ((inhibit-read-only t))
(run-hooks 'org-agenda-finalize-hook))
(when (or org-agenda-tag-filter (get 'org-agenda-tag-filter :preset-filter))