Avoid extra space when removing state
* lisp/org.el (org-todo): check if org-string-nw-p instead of non nil.
This commit is contained in:
parent
2fb60532cf
commit
d313b24991
|
@ -12193,7 +12193,7 @@ When called through ELisp, arg is also interpreted in the following way:
|
||||||
(run-hook-with-args-until-success
|
(run-hook-with-args-until-success
|
||||||
'org-todo-get-default-hook org-state org-last-state)
|
'org-todo-get-default-hook org-state org-last-state)
|
||||||
org-state))
|
org-state))
|
||||||
(next (if org-state (concat " " org-state " ") " "))
|
(next (if (org-string-nw-p org-state) (concat " " org-state " ") " "))
|
||||||
(change-plist (list :type 'todo-state-change :from this :to org-state
|
(change-plist (list :type 'todo-state-change :from this :to org-state
|
||||||
:position startpos))
|
:position startpos))
|
||||||
dolog now-done-p)
|
dolog now-done-p)
|
||||||
|
|
Loading…
Reference in New Issue