[Emacs] Only add completer on completed todos
This commit is contained in:
parent
f4086f8739
commit
73c7777217
@ -297,6 +297,7 @@ We're going to use this to write separate parts of our config to different secti
|
|||||||
(defun imalison:maybe-add-completer (state-change)
|
(defun imalison:maybe-add-completer (state-change)
|
||||||
(when
|
(when
|
||||||
(and (eq (plist-get state-change :type) 'todo-state-change)
|
(and (eq (plist-get state-change :type) 'todo-state-change)
|
||||||
|
(member (plist-get state-change :to) org-done-keywords)
|
||||||
(imalison:shared-non-habit-p)
|
(imalison:shared-non-habit-p)
|
||||||
(null (org-entry-get nil "COMPLETER")))
|
(null (org-entry-get nil "COMPLETER")))
|
||||||
(org-set-property "COMPLETER" imalison:org-whoami)))
|
(org-set-property "COMPLETER" imalison:org-whoami)))
|
||||||
|
Loading…
Reference in New Issue
Block a user