浏览代码

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.
Bastien Guerry 14 年之前
父节点
当前提交
35ba10c0af
共有 1 个文件被更改,包括 1 次插入0 次删除
  1. 1 0
      lisp/org-exp.el

+ 1 - 0
lisp/org-exp.el

@@ -1513,6 +1513,7 @@ from the buffer."
 	(tags (plist-get opts :tags))
 	(tags (plist-get opts :tags))
 	(pri  (plist-get opts :priority))
 	(pri  (plist-get opts :priority))
 	(elts '(1 2 3 4 5))
 	(elts '(1 2 3 4 5))
+	(case-fold-search nil)
 	rpl)
 	rpl)
     (setq elts (delq nil (list 1 (if todo 2) (if pri 3) 4 (if tags 5))))
     (setq elts (delq nil (list 1 (if todo 2) (if pri 3) 4 (if tags 5))))
     (when (or (not todo) (not tags) (not pri))
     (when (or (not todo) (not tags) (not pri))