Browse Source

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.
Bastien Guerry 12 years ago
parent
commit
93b0cf60e7
1 changed files with 2 additions and 1 deletions
  1. 2 1
      lisp/org-agenda.el

+ 2 - 1
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))