Fix wrong-case matching of TODO keywords in `org-entry-properties'

This commit is contained in:
Carsten Dominik 2010-01-14 17:26:09 +01:00
parent cab009b78e
commit b83c03a898
3 changed files with 6 additions and 0 deletions

View File

@ -12534,6 +12534,8 @@ chapter about publishing.
@i{J@"urgen Vollmer} contributed code generating the table of contents @i{J@"urgen Vollmer} contributed code generating the table of contents
in HTML output. in HTML output.
@item @item
@i{Samuel Wales} has provided important feedback and bug reports.
@item
@i{Chris Wallace} provided a patch implementing the @samp{QUOTE} @i{Chris Wallace} provided a patch implementing the @samp{QUOTE}
keyword. keyword.
@item @item

View File

@ -1,5 +1,8 @@
2010-01-14 Carsten Dominik <carsten.dominik@gmail.com> 2010-01-14 Carsten Dominik <carsten.dominik@gmail.com>
* org.el (org-entry-properties): Don't match wrong-case TODO
keywords.
* org-agenda.el (org-agenda-schedule, org-agenda-deadline): * org-agenda.el (org-agenda-schedule, org-agenda-deadline):
Document that ARG is passed through to remove the date. Document that ARG is passed through to remove the date.
(org-agenda-bulk-action): Accept prefix arg and pass it on. Do (org-agenda-bulk-action): Accept prefix arg and pass it on. Do

View File

@ -12516,6 +12516,7 @@ things up because then unnecessary parsing is avoided."
(org-with-point-at pom (org-with-point-at pom
(let ((clockstr (substring org-clock-string 0 -1)) (let ((clockstr (substring org-clock-string 0 -1))
(excluded '("TODO" "TAGS" "ALLTAGS" "PRIORITY")) (excluded '("TODO" "TAGS" "ALLTAGS" "PRIORITY"))
(case-fold-search nil)
beg end range props sum-props key value string clocksum) beg end range props sum-props key value string clocksum)
(save-excursion (save-excursion
(when (condition-case nil (when (condition-case nil