From 93b0cf60e7c814dfcf4257c2403a500872f08171 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Tue, 8 Jan 2013 11:34:09 +0100 Subject: [PATCH] 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. --- lisp/org-agenda.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 96841e73e..9b7515f5d 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -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)) -- 2.11.4.GIT