diff options
| author | Marco Wahl <marcowahlsoft@gmail.com> | 2017-01-27 19:35:16 +0100 |
|---|---|---|
| committer | Marco Wahl <marcowahlsoft@gmail.com> | 2017-01-27 19:35:16 +0100 |
| commit | d715cc42fa0a08f4d1fa77b35119fa8b7af59a16 (patch) | |
| tree | 0ca57808a3105ac1ec232f8ff5e1fd2aba6aa68e | |
| parent | 919e864968c14d167c512f04fd4f06f3dcf08a00 (diff) | |
| download | org-mode-d715cc42fa0a08f4d1fa77b35119fa8b7af59a16.tar.gz | |
Fix `org-refresh-property'
* lisp/org.el(org-refresh-property): Fixed by comparison to the code
before the refactoring.
With commit 126a1cd7c the "Effort" property broke the agenda.
| -rw-r--r-- | lisp/org.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org.el b/lisp/org.el index db780b3..b5f88be 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -9766,8 +9766,8 @@ sub-tree if optional argument INHERIT is non-nil." ;; TPROP is a text property symbol. (put-text-property start end tprop p) ;; TPROP is an alist with (property . function) elements. - (pcase-dolist (`(,p . ,f) tprop) - (put-text-property start end p (funcall f p)))))))) + (pcase-dolist (`(,prop . ,f) tprop) + (put-text-property start end prop (funcall f p)))))))) (defun org-refresh-category-properties () "Refresh category text properties in the buffer." |