diff options
author | Bastien Guerry <bzg@altern.org> | 2011-03-02 18:43:50 +0100 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2011-03-02 18:43:50 +0100 |
commit | 35ba10c0af920b61238854c9892154051fd31473 (patch) | |
tree | e4f4373fedcf633ff7563cbc8aaae67115dc1219 | |
parent | fe67a66e2f94cda035a9036606ec429883bb9bf3 (diff) | |
download | org-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.el | 1 |
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)) |