浏览代码

Merge branch 'maint'

Nicolas Goaziou 7 年之前
父节点
当前提交
1c07327a51
共有 1 个文件被更改,包括 2 次插入3 次删除
  1. 2 3
      contrib/lisp/org-depend.el

+ 2 - 3
contrib/lisp/org-depend.el

@@ -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!