Merge branch 'maint'
This commit is contained in:
commit
1c07327a51
|
@ -388,9 +388,8 @@ this ID property, that entry is also checked."
|
|||
(save-excursion
|
||||
(goto-char pos)
|
||||
;; find the older sibling, exit if no more siblings
|
||||
(condition-case nil
|
||||
(outline-backward-same-level 1)
|
||||
(error (throw 'ignore t)))
|
||||
(unless (org-get-last-sibling)
|
||||
(throw 'ignore t))
|
||||
;; Check if this entry is not yet done and block
|
||||
(unless (org-entry-is-done-p)
|
||||
;; return nil, to indicate that we block the change!
|
||||
|
|
Loading…
Reference in New Issue