Remove effort property cache
* lisp/org-compat.el (org-refresh-effort-properties): Obsolete. * lisp/org-clock.el (org-clock-in): * lisp/org.el (org-default-properties): (org-edit-agenda-file-list) (org-set-property-and-value): Remove unnecessary calls to `org-refresh-effort-properties'. (org-agenda-ignore-properties): Update the allowed values.
This commit is contained in:
parent
2efc7fcfdc
commit
ebbdd67a2a
|
@ -1313,8 +1313,6 @@ time as the start time. See `org-clock-continuously' to make this
|
|||
the default behavior."
|
||||
(interactive "P")
|
||||
(setq org-clock-notification-was-shown nil)
|
||||
(unless org-element-use-cache
|
||||
(org-refresh-effort-properties))
|
||||
(catch 'abort
|
||||
(let ((interrupting (and (not org-clock-resolving-clocks-due-to-idleness)
|
||||
(org-clocking-p)))
|
||||
|
|
|
@ -583,6 +583,7 @@ Counting starts at 1."
|
|||
'org--math-p "9.7")
|
||||
|
||||
(make-obsolete 'org-refresh-category-properties "no longer used" "9.7")
|
||||
(make-obsolete 'org-refresh-effort-properties "no longer used" "9.7")
|
||||
|
||||
(defun org-compatible-face (inherits specs)
|
||||
"Make a compatible face specification.
|
||||
|
|
17
lisp/org.el
17
lisp/org.el
|
@ -12468,10 +12468,6 @@ variables is set."
|
|||
;; Maybe update the effort value:
|
||||
(unless (equal current value)
|
||||
(org-entry-put nil org-effort-property value))
|
||||
(unless (org-element--cache-active-p)
|
||||
(org-refresh-property '((effort . identity)
|
||||
(effort-minutes . org-duration-to-minutes))
|
||||
value))
|
||||
(when (equal (org-get-heading t t t t)
|
||||
(bound-and-true-p org-clock-current-task))
|
||||
(setq org-clock-effort value)
|
||||
|
@ -13383,11 +13379,6 @@ completion."
|
|||
(beginning-of-line 1)
|
||||
(skip-chars-forward " \t")
|
||||
(when (equal prop org-effort-property)
|
||||
(unless (org-element--cache-active-p)
|
||||
(org-refresh-property
|
||||
'((effort . identity)
|
||||
(effort-minutes . org-duration-to-minutes))
|
||||
nval))
|
||||
(when (string= org-clock-current-task heading)
|
||||
(setq org-clock-effort nval)
|
||||
(org-clock-update-mode-line)))
|
||||
|
@ -15112,10 +15103,9 @@ Properties are used to prepare buffers for effort estimates,
|
|||
appointments, statistics and subtree-local categories.
|
||||
If you don't use these in the agenda, you can add them to this
|
||||
list and agenda building will be a bit faster.
|
||||
The value is a list, with zero or more of the symbols `effort', `appt',
|
||||
or `stats'."
|
||||
The value is a list, with zero or more of the symbols `appt' or
|
||||
`stats'."
|
||||
:type '(set :greedy t
|
||||
(const effort)
|
||||
(const appt)
|
||||
(const stats))
|
||||
:version "26.1"
|
||||
|
@ -15404,9 +15394,6 @@ When a buffer is unmodified, it is just killed. When modified, it is saved
|
|||
(org-set-regexps-and-options 'tags-only)
|
||||
(or (memq 'stats org-agenda-ignore-properties)
|
||||
(org-refresh-stats-properties))
|
||||
(or (memq 'effort org-agenda-ignore-properties)
|
||||
(unless org-element-use-cache
|
||||
(org-refresh-effort-properties)))
|
||||
(or (memq 'appt org-agenda-ignore-properties)
|
||||
(org-refresh-properties "APPT_WARNTIME" 'org-appt-warntime))
|
||||
(dolist (el org-todo-keywords-1)
|
||||
|
|
Loading…
Reference in New Issue