Fix global skip function for org-mode
This commit is contained in:
parent
a44965490d
commit
e8b70a8549
1 changed files with 2 additions and 2 deletions
|
@ -4,7 +4,7 @@
|
||||||
|
|
||||||
;; Author: Tom Willemse <tom@ryuslash.org>
|
;; Author: Tom Willemse <tom@ryuslash.org>
|
||||||
;; Keywords: local
|
;; Keywords: local
|
||||||
;; Version: 20190416223342
|
;; Version: 20190416233838
|
||||||
;; Package-Requires: (org-plus-contrib org-bullets hydra)
|
;; Package-Requires: (org-plus-contrib org-bullets hydra)
|
||||||
|
|
||||||
;; This program is free software; you can redistribute it and/or modify
|
;; This program is free software; you can redistribute it and/or modify
|
||||||
|
@ -53,7 +53,7 @@ Only tasks of a level greater than 3 are considered. A task has a
|
||||||
predecessor if there is a non-DONE sibling defined before it."
|
predecessor if there is a non-DONE sibling defined before it."
|
||||||
(let ((point (point)))
|
(let ((point (point)))
|
||||||
(save-excursion
|
(save-excursion
|
||||||
(org-backward-heading-same-level 1)
|
(org-backward-heading-same-level 1 :invisible-ok)
|
||||||
(seq-let [level _ keyword] (org-heading-components)
|
(seq-let [level _ keyword] (org-heading-components)
|
||||||
(not (or (< level 3)
|
(not (or (< level 3)
|
||||||
(= point (point))
|
(= point (point))
|
||||||
|
|
Loading…
Reference in a new issue