From 8d98835a3ccf98a2e79a68193fdb8f4d76b589a2 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Wed, 25 Jul 2012 10:12:53 +0200 Subject: [PATCH] org-export: Export properties from subtrees are case insensitive * contrib/lisp/org-export.el (org-export--get-subtree-options): Export properties from subtrees are case insensitive. --- contrib/lisp/org-export.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/contrib/lisp/org-export.el b/contrib/lisp/org-export.el index f242dec06..206866534 100644 --- a/contrib/lisp/org-export.el +++ b/contrib/lisp/org-export.el @@ -1323,7 +1323,9 @@ for export. Return options as a plist." (let ((property (nth 1 option))) (when (and property (not (member property seen))) (let* ((subtree-prop (concat "EXPORT_" property)) - (value (org-entry-get (point) subtree-prop))) + ;; Export properties are not case-sensitive. + (value (let ((case-fold-search t)) + (org-entry-get (point) subtree-prop)))) (push property seen) (when value (setq plist