[nongnu] elpa/hyperdrive bc622823e6 10/13: Tidy: Function call

[ELPA Syncer]

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

    Tidy: Function call
---
 hyperdrive.el | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/hyperdrive.el b/hyperdrive.el
index e7fac8896b..6eb24779b6 100644
--- a/hyperdrive.el
+++ b/hyperdrive.el
@@ -543,9 +543,8 @@ recurse, passing NO-RECURSE t to `hyperdrive-next-version'."
       (if (hyperdrive--entry-directory-p entry)
           ;; For directories, increment the version number by one.
           (let ((next-version (1+ (hyperdrive-entry-version entry))))
-            (if (eq next-version latest-version)
-                (open-at-version nil)
-              (open-at-version next-version)))
+            (open-at-version (pcase next-version
+                               (latest-version nil) (_ next-version))))
         (pcase-let* ((`(,_range-start . ,(map (:range-end range-end))) 
(hyperdrive-entry-version-range entry))
                      (next-range-start (1+ range-end))
                      ((map (:existsp next-range-existsp) (:range-end 
next-range-end))