                    (concat "If you want to keep %s, put "
                            "(straight-use-package %s%S) "
                            "in your init-file.")
-                   package "'" (intern package))))))
+                   package "'" (intern package)))
+                t)))
         (unless interactive
-          (straight--register-recipe recipe))))))
+          (straight--register-recipe recipe))
+        ;; This is probably not the correct logic for the return
+        ;; value.
+        t))))
 
 ;;;###autoload
 (defun straight-reload-package (package &optional interactive)

  ;; Make it so that `:ensure' uses `straight-use-package' instead of
  ;; `package-install'.
  (defun straight--use-package-ensure-function
      (name ensure state &optional only-if-installed)
    (when ensure
      (let ((recipe (or (and (not (eq ensure t)) ensure)
                        (plist-get state :recipe)
                        name)))

                             &optional
                             interactive parent-recipe reload
                             only-if-installed)
  "Undocumented. Return t if package was/is installed."
  (interactive (list (straight-get-recipe) t))
  (let ((recipe (straight--convert-recipe melpa-style-recipe)))
    (straight--with-plist recipe
