ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Make sure tags matching is case-insensitive.

This commit is contained in:
Carsten Dominik 2008-09-19 08:07:50 +02:00
parent 17bdd57209
commit 04419cca3d
2 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/ChangeLog
View File

@ -1,3 +1,10 @@
2008-09-19 Carsten Dominik <dominik@science.uva.nl>
* org.el (org-scan-tags): Make sure that tags matching is not case
sensitive. TODO keyword matching is case sensitive, however, to
avoid confusion with similar words that are not meant to be
keywords.
2008-09-18 Carsten Dominik <dominik@science.uva.nl> 2008-09-18 Carsten Dominik <dominik@science.uva.nl>
* org.el (org-get-local-tags-at): New function. * org.el (org-get-local-tags-at): New function.

2
lisp/org.el
View File

@ -9456,7 +9456,7 @@ only lines with a TODO keyword are included in the output."
(setcdr (car tags-alist) (setcdr (car tags-alist)
(org-remove-uniherited-tags (cdar tags-alist)))) (org-remove-uniherited-tags (cdar tags-alist))))
(when (and (or (not todo-only) (member todo org-not-done-keywords)) (when (and (or (not todo-only) (member todo org-not-done-keywords))
(eval matcher) (let ((case-fold-search t)) (eval matcher))
(or (or
(not (member org-archive-tag tags-list)) (not (member org-archive-tag tags-list))
;; we have an archive tag, should we use this anyway? ;; we have an archive tag, should we use this anyway?