 destinations."
   (unless (listp files)
     (error "Invalid :files directive: %S" files))
-  (let ((mappings nil
+  (let ((mappings nil)
         (exclusions nil))
     ;; We have to do some funny business to get `:defaults' splicing
     ;; and wildcard expansion to work, hence `while' instead of

          (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)))

`make-hash-table' function and which defaults to `eq'. The order
of the entries that are kept will be the same as in ALIST."
  (let ((hash (make-hash-table :test (or test #'eq)))
        (new-alist nil))
    (dolist (entry (reverse alist))
      (unless (gethash (car entry) hash)
        (push entry new-alist)
