forked from mirrors/org-mode
Merge branch 'maint'
This commit is contained in:
commit
5792667bde
|
@ -16373,7 +16373,7 @@ Throw an error when trying to set a property with an invalid name."
|
||||||
;; `org-entry-put' also makes the following check, but this one
|
;; `org-entry-put' also makes the following check, but this one
|
||||||
;; avoids polluting `org-last-set-property' and
|
;; avoids polluting `org-last-set-property' and
|
||||||
;; `org-last-set-property-value' needlessly.
|
;; `org-last-set-property-value' needlessly.
|
||||||
(unless (org--valid-property-p)
|
(unless (org--valid-property-p property)
|
||||||
(user-error "Invalid property name: \"%s\"" property))
|
(user-error "Invalid property name: \"%s\"" property))
|
||||||
(let ((value (or value (org-read-property-value property)))
|
(let ((value (or value (org-read-property-value property)))
|
||||||
(fn (cdr (assoc-string property org-properties-postprocess-alist t))))
|
(fn (cdr (assoc-string property org-properties-postprocess-alist t))))
|
||||||
|
|
Loading…
Reference in New Issue