awesome-emacs/nursery
1
0
Fork 0
mirror of https://github.com/chrisbarrett/nursery synced 2025-09-10 15:33:31 -05:00
Code Issues Packages Projects Releases Wiki Activity

Advance point through group headings when moving to next review note

Browse Source
This commit is contained in:
Chris Barrett
2022-08-26 11:49:54 +12:00
parent 4bce274ed2
commit 108360fa6f
1 changed files with 5 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/org-roam-review.el
View File

@@ -618,6 +618,11 @@ them as reviewed with `org-roam-review-accept',
(found)) (found))
(while (not stop) (while (not stop)
(magit-section-forward-sibling) (magit-section-forward-sibling)
;; Skip over group headlines
(magit-section-case
(org-roam-review-grouping-section
(magit-section-forward)))
(setq found (not (equal 'font-lock-comment-face (get-text-property (point) 'face)))) (setq found (not (equal 'font-lock-comment-face (get-text-property (point) 'face))))
(let ((unchanged (equal (magit-current-section) section))) (let ((unchanged (equal (magit-current-section) section)))
(setq stop (or found unchanged)))) (setq stop (or found unchanged))))