Merge branch 'maint'
This commit is contained in:
commit
6e0e76308c
|
@ -15558,7 +15558,6 @@ However, if LITERAL-NIL is set, return the string value \"nil\" instead."
|
||||||
(save-restriction
|
(save-restriction
|
||||||
(widen)
|
(widen)
|
||||||
(catch 'ex
|
(catch 'ex
|
||||||
(let (org-file-properties org-global-properties org-global-properties-fixed)
|
|
||||||
(while t
|
(while t
|
||||||
(when (setq tmp (org-entry-get nil property nil 'literal-nil))
|
(when (setq tmp (org-entry-get nil property nil 'literal-nil))
|
||||||
(or (ignore-errors (org-back-to-heading t))
|
(or (ignore-errors (org-back-to-heading t))
|
||||||
|
@ -15566,7 +15565,7 @@ However, if LITERAL-NIL is set, return the string value \"nil\" instead."
|
||||||
(move-marker org-entry-property-inherited-from (point))
|
(move-marker org-entry-property-inherited-from (point))
|
||||||
(throw 'ex tmp))
|
(throw 'ex tmp))
|
||||||
(or (ignore-errors (org-up-heading-safe))
|
(or (ignore-errors (org-up-heading-safe))
|
||||||
(throw 'ex nil)))))))
|
(throw 'ex nil))))))
|
||||||
(setq tmp (or tmp
|
(setq tmp (or tmp
|
||||||
(cdr (assoc property org-file-properties))
|
(cdr (assoc property org-file-properties))
|
||||||
(cdr (assoc property org-global-properties))
|
(cdr (assoc property org-global-properties))
|
||||||
|
|
Loading…
Reference in New Issue