From 1f8fb3cf54fddad9ff0cb487754e1818044e5dea Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Thu, 26 Jan 2017 23:10:53 +0100 Subject: [PATCH] Fix `org-property-inherit-p' * lisp/org.el (org-property-inherit-p): Properties are case insensitive. --- lisp/org.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 3ef57dea6..d51ae3f3f 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -3828,14 +3828,14 @@ in this variable)." (regexp :tag "Properties matched by regexp"))) (defun org-property-inherit-p (property) - "Check if PROPERTY is one that should be inherited." + "Return a non-nil value if PROPERTY should be inherited." (cond ((eq org-use-property-inheritance t) t) ((not org-use-property-inheritance) nil) ((stringp org-use-property-inheritance) (string-match org-use-property-inheritance property)) ((listp org-use-property-inheritance) - (member property org-use-property-inheritance)) + (member-ignore-case property org-use-property-inheritance)) (t (error "Invalid setting of `org-use-property-inheritance'")))) (defcustom org-columns-default-format "%25ITEM %TODO %3PRIORITY %TAGS"