Fix tag alignment after todo state change with empty headline
* lisp/org.el (org-todo): Fix tag alignment with empty headline.
This commit is contained in:
parent
495826e897
commit
e3856a0c8e
|
@ -10229,7 +10229,9 @@ When called through ELisp, arg is also interpreted in the following way:
|
||||||
(looking-at org-todo-line-regexp))
|
(looking-at org-todo-line-regexp))
|
||||||
(< (point) (+ 2 (or (match-end 2) (match-end 1)))))
|
(< (point) (+ 2 (or (match-end 2) (match-end 1)))))
|
||||||
(goto-char (or (match-end 2) (match-end 1)))
|
(goto-char (or (match-end 2) (match-end 1)))
|
||||||
(and (looking-at " ") (just-one-space)))
|
(and (looking-at " ")
|
||||||
|
(not (looking-at " *:"))
|
||||||
|
(just-one-space)))
|
||||||
(when org-trigger-hook
|
(when org-trigger-hook
|
||||||
(save-excursion
|
(save-excursion
|
||||||
(run-hook-with-args 'org-trigger-hook change-plist)))
|
(run-hook-with-args 'org-trigger-hook change-plist)))
|
||||||
|
|
Loading…
Reference in New Issue