[nongnu] elpa/hyperdrive 06d6f04c2c 060/123: Change/Fix: (-menu) Display next version "latest" when appropriate

[ELPA Syncer]

branch: elpa/hyperdrive
commit 06d6f04c2c17944199c2031261674d5940353f11
Author: Joseph Turner <joseph@ushin.org>
Commit: Joseph Turner <joseph@ushin.org>

    Change/Fix: (-menu) Display next version "latest" when appropriate
---
 hyperdrive-menu.el | 17 ++++++++++-------
 1 file changed, 10 insertions(+), 7 deletions(-)

diff --git a/hyperdrive-menu.el b/hyperdrive-menu.el
index 5bbdf34306..9df32ba9b1 100644
--- a/hyperdrive-menu.el
+++ b/hyperdrive-menu.el
@@ -150,13 +150,16 @@
                             (hyperdrive-entry-next entry))))
      ;; :transient t
      :description (lambda ()
-                    (if-let ((entry (oref transient--prefix scope))
-                             (hyperdrive (hyperdrive-entry-hyperdrive entry)))
-                        (concat "Next" (when-let* ((next-entry 
(hyperdrive-entry-next entry))
-                                                   (version 
(hyperdrive-entry-version next-entry)))
-                                         (concat ": " (propertize 
(number-to-string version)
-                                                                  'face 
'transient-value))))
-                      "Next")))
+                    (concat "Next"
+                            (when-let* ((entry (oref transient--prefix scope))
+                                        (hyperdrive 
(hyperdrive-entry-hyperdrive entry))
+                                        (next-entry (hyperdrive-entry-next 
entry))
+                                        ;; Don't add ": latest" if we're 
already at the latest version
+                                        ((not (eq entry next-entry)))
+                                        (display-version (if-let 
((next-version (hyperdrive-entry-version next-entry)))
+                                                             (number-to-string 
next-version)
+                                                           "latest")))
+                              (concat ": " (propertize display-version 'face 
'transient-value))))))
     ("v p" "Previous" hyperdrive-previous-version
      :if (lambda () (oref transient--prefix scope))
      :inapt-if-not (lambda ()