From f6751cc90600339132cd123535b4514905a31966 Mon Sep 17 00:00:00 2001
From: Bram Schoenmakers <me@bramschoenmakers.nl>
Date: Sun, 16 Apr 2023 08:25:14 +0200
Subject: [PATCH] Use 'selective' inheritance when org-use-property-inheritance
 is a list

This symbol is mentioned in the org-entry-get documentation.
---
 org-ql.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/org-ql.el b/org-ql.el
index 44ed50e..40ad7e8 100644
--- a/org-ql.el
+++ b/org-ql.el
@@ -1803,7 +1803,7 @@ interpreted as nil or non-nil)."
                    (setf property (substring (symbol-name property) 1)))
                  (list 'property property value
                        :inherit (cond ((plist-member plist :inherit) (plist-get plist :inherit))
-                                      ((listp org-use-property-inheritance) nil)
+                                      ((listp org-use-property-inheritance) ''selective)
                                       (t org-use-property-inheritance)))))
   ;; MAYBE: Should case folding be disabled for properties?  What about values?
   ;; MAYBE: Support (property) without args.