                   (lambda (&rest args)
                     (print! "%s" (cdr (apply #'doom-call-process args))))
                 (lambda (&rest args)
-                  (message "%s" (cdr (apply #'doom-call-process args)))))))
+                  (apply #'doom-call-process args)))))
     (unless (file-directory-p repo-dir)
       (save-match-data
         (unless (executable-find "git")

                            "--branch" straight-repository-branch))
               (make-directory repo-dir 'recursive)
               (let ((default-directory repo-dir))
                 (funcall call "git" "init" "-b" straight-repository-branch)
                 (funcall call "git" "remote" "add" "origin" repo-url
                          "--master" straight-repository-branch)
                 (funcall call "git" "fetch" "origin" pin
                          "--depth" (number-to-string depth)
                          "--no-tags")
                 (funcall call "git" "reset" "--hard" pin)))))))
       (print! (success "Done!"))))
    (require 'straight (concat repo-dir "/straight.el"))
    (doom-log "Initializing recipes")
    (with-temp-buffer

        (straight-override-recipe (cons name recipe))
        (when-let (local-repo (plist-get recipe :local-repo))
          (setq repo local-repo)))
      (print-group!
       ;; Only clone the package, don't build them. Straight hasn't been fully
       ;; configured by this point.
       (straight-use-package name nil t))
      ;; In case the package hasn't been built yet.
      (or (member (directory-file-name (straight--build-dir (symbol-name name)))
                  load-path)
          (add-to-list 'load-path (directory-file-name (straight--repos-dir repo)))))))

