   "Read version lockfiles and return merged alist of saved versions.
 The alist maps repository names as strings to versions, whose
 interpretations are defined by the relevant VC backend."
-  (let ((versions nil)
+  (let ((versions nil))
     (dolist (spec straight-profiles)
       (cl-destructuring-bind (_profile . versions-lockfile) spec
         (let ((lockfile-path (straight--versions-file versions-lockfile)))

ACTION is an optional string that describes the action being
performed on each repository, to be used for progress messages.
The default value is \"Processing\"."
  (let ((next-repos nil
        (skipped-repos nil)
        (canceled-repos nil))
    (straight--map-repos

          (insert-file-contents-literally
           (expand-file-name (symbol-name package) "recipes/"))
          (let ((melpa-recipe (read (current-buffer)))
                (plist nil))
            (cl-destructuring-bind (name . melpa-plist) melpa-recipe
              (straight--put plist :type 'git)
              (when-let ((files (plist-get melpa-plist :files)))
