    (lambda (elt) t)
    'require-match))
 
-(defun straight--map-repo-packages (func)
-  "Call FUNC for each local repository referenced in the known recipes.
-The function FUNC is passed one argument, the name (as a string)
-of one of the packages using the local repository."
-  (straight--map-repos
-   (lambda (recipe)
-     (straight--with-plist recipe
-         (package)
-       (funcall func package)))))
-
 (defun straight--get-recipe-interactively (sources &optional action)
   "Use `completing-read' to select an available package.
 SOURCES is a list containing one or more of `melpa', `gnu-elpa',

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;; Recipe processing

(defvar gnu-elpa-url "git://git.savannah.gnu.org/emacs/elpa.git"
  "URL of the Git repository for the GNU ELPA package repository.")


       (concat "Repository %S is not version-controlled with Git, "
               "cannot set HEAD")
       local-repo))))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;; Figuring out whether packages need to be rebuilt
