emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/hyperdrive 785ebe8edd 110/123: Fix: (hyperdrive-menu) Upda


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive 785ebe8edd 110/123: Fix: (hyperdrive-menu) Update next/prev between files/dirs
Date: Fri, 6 Oct 2023 01:01:13 -0400 (EDT)

branch: elpa/hyperdrive
commit 785ebe8edd43f3849390ddda8d81ccec843e5dc6
Author: Adam Porter <adam@alphapapa.net>
Commit: Adam Porter <adam@alphapapa.net>

    Fix: (hyperdrive-menu) Update next/prev between files/dirs
---
 hyperdrive-menu.el | 12 +++++++++---
 1 file changed, 9 insertions(+), 3 deletions(-)

diff --git a/hyperdrive-menu.el b/hyperdrive-menu.el
index aeacb2555e..4c9d18986d 100644
--- a/hyperdrive-menu.el
+++ b/hyperdrive-menu.el
@@ -130,12 +130,18 @@
             (eq major-mode 'hyperdrive-dir-mode))
       :transient t)
      ;; TODO: Combine previous and next commands
-     ;; FIXME: Refresh transient when navigating between files and directories.
-     ("p" "previous" hyperdrive-ewoc-previous
+     ;; TODO: See "predicate refreshing" 
<https://github.com/magit/transient/issues/157>.
+     ("p" "previous" (lambda ()
+                       (interactive)
+                       (hyperdrive-ewoc-previous)
+                       (hyperdrive-menu (oref transient--prefix scope)))
       :if (lambda ()
             (eq major-mode 'hyperdrive-dir-mode))
       :transient t)
-     ("n" "next" hyperdrive-ewoc-next
+     ("n" "next" (lambda ()
+                   (interactive)
+                   (hyperdrive-ewoc-next)
+                   (hyperdrive-menu (oref transient--prefix scope)))
       :if (lambda ()
             (eq major-mode 'hyperdrive-dir-mode))
       :transient t)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]