From 7e47a57534525d0143aa50980573d6db7e1bc2aa Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Sun, 3 May 2026 12:32:54 +0300 Subject: [fix] view: Add proper ewoc navigation --- lisp/forgejo-view.el | 16 ++++++++++++++-- 1 file changed, 14 insertions(+), 2 deletions(-) diff --git a/lisp/forgejo-view.el b/lisp/forgejo-view.el index 1574c3d..82e40af 100644 --- a/lisp/forgejo-view.el +++ b/lisp/forgejo-view.el @@ -233,6 +233,18 @@ Handles #N issue/PR refs and markdown URLs." (interactive) (forgejo-review-open-thread)) +;;; EWOC navigation + +(defun forgejo-view-next () + "Move to the next EWOC node." + (interactive) + (ewoc-goto-next forgejo-view--ewoc 1)) + +(defun forgejo-view-previous () + "Move to the previous EWOC node." + (interactive) + (ewoc-goto-prev forgejo-view--ewoc 1)) + ;;; Shared view keymap (keymap-popup-define forgejo-view-mode-map @@ -252,8 +264,8 @@ Handles #N issue/PR refs and markdown URLs." "RET" ("Follow link" forgejo-view-follow-link) "g" ("Refresh" forgejo-view-refresh) "b" ("Open in browser" forgejo-view-browse) - "n" ("Next" ewoc-goto-next) - "p" ("Previous" ewoc-goto-prev)) + "n" ("Next" forgejo-view-next) + "p" ("Previous" forgejo-view-previous)) ;;; Node access -- cgit v1.0