summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <bzg@altern.org>2011-03-02 18:43:50 +0100
committerBastien Guerry <bzg@altern.org>2011-03-02 18:43:50 +0100
commit35ba10c0af920b61238854c9892154051fd31473 (patch)
treee4f4373fedcf633ff7563cbc8aaae67115dc1219
parentfe67a66e2f94cda035a9036606ec429883bb9bf3 (diff)
downloadorg-mode-35ba10c0af920b61238854c9892154051fd31473.tar.gz
Bugfix when exporting TODO keywords from the headline.
* org-exp.el (org-export-remove-headline-metadata): bugfix: don't case-fold-search to avoid mixing TODO keywords with real headline words. Thanks to Samuel Wales for spotting and reporting this.
-rw-r--r--lisp/org-exp.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/org-exp.el b/lisp/org-exp.el
index 8eb1fbf..4adc81a 100644
--- a/lisp/org-exp.el
+++ b/lisp/org-exp.el
@@ -1513,6 +1513,7 @@ from the buffer."
(tags (plist-get opts :tags))
(pri (plist-get opts :priority))
(elts '(1 2 3 4 5))
+ (case-fold-search nil)
rpl)
(setq elts (delq nil (list 1 (if todo 2) (if pri 3) 4 (if tags 5))))
(when (or (not todo) (not tags) (not pri))