   (remove-hook 'after-init-hook #'straight--save-build-cache)
   (remove-hook 'straight--after-reinit-hook #'straight--save-build-cache))
 
+;;;;; Bookkeeping
+
 (defvar straight--finalization-guaranteed nil
   "Non-nil if `straight-declare-init-finished' is guaranteed to be called.
 This variable is part of the system that works to reduce

           (eq (gethash key table straight--not-present-paranoid)
               straight--not-present-paranoid))))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;; Utility functions: strings

(cl-defun straight--uniquify (prefix taken)
  "Generate a string with PREFIX that is not in list TAKEN.

back to nil when the straight.el bootstrap is run or
`straight-use-package' is invoked.")

;;;;; Recipe repository support

(defvar straight--gnu-elpa-url
  "https://git.savannah.gnu.org/git/emacs/elpa.git"
