branch: elpa/hyperdrive
commit 0ef839189c7a9114fc0544ca4eb087de4b58b18b
Author: Joseph Turner <jos...@ushin.org>
Commit: Joseph Turner <jos...@ushin.org>

    Fix: (hyperdrive-entry-next) Set entry version to nil when at latest
---
 hyperdrive-lib.el | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/hyperdrive-lib.el b/hyperdrive-lib.el
index 6ea63fb434..557066503c 100644
--- a/hyperdrive-lib.el
+++ b/hyperdrive-lib.el
@@ -450,6 +450,9 @@ Sends a request to the gateway for hyperdrive's latest 
version."
     ;; ENTRY is a directory: increment the version number by one.
     (when (hyperdrive--entry-directory-p entry)
       (cl-incf (hyperdrive-entry-version next-entry))
+      (when (eq latest-version (hyperdrive-entry-version next-entry))
+        ;; Next ENTRY is the latest version: return ENTRY with nil version.
+        (setf (hyperdrive-entry-version next-entry) nil))
       (cl-return-from hyperdrive-entry-next next-entry))
 
     ;; ENTRY is a file...

Reply via email to