[nongnu] elpa/hyperdrive 53b48e337e 27/49: Tidy: (hyperdrive-fill-version-ranges) Don't let-bind finally

[ELPA Syncer]

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

    Tidy: (hyperdrive-fill-version-ranges) Don't let-bind finally
---
 hyperdrive-lib.el | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/hyperdrive-lib.el b/hyperdrive-lib.el
index 57d092ec4c..b65468adb0 100644
--- a/hyperdrive-lib.el
+++ b/hyperdrive-lib.el
@@ -804,12 +804,11 @@ Returns the ranges cons cell for ENTRY."
 Once all requests return, call FINALLY with no arguments."
   (declare (indent defun))
   (let* ((outstanding-nonexistent-requests-p)
-         (finally (lambda ()
-                    (unless outstanding-nonexistent-requests-p
-                      (funcall finally))))
          (limit hyperdrive-fill-version-ranges-limit)
          (fill-entry-queue (make-plz-queue :limit hyperdrive-queue-size
-                                           :finally finally))
+                                           :finally (lambda ()
+                                                      (unless 
outstanding-nonexistent-requests-p
+                                                        (funcall finally)))))
          ;; Flag used in the nonexistent-queue finalizer.
          finishedp)
     (cl-labels ((fill-existent (entry)