Account for the absence of Quarto CLI (#2164)

* Account for the absence of Quarto CLI

* Apparently quarto_available() appeared in v1.5.0

I don't think minimum version is truly supported/enforced for a suggested package, so I don't expect this to be a definitive fix. But I think this might be as far as I can/should go here in usethis. Morally, it's the right solution.

This should be sufficient once the quarto package itself is being built for all CRAN flavors.

Author: jennybc

DESCRIPTION

@@ -50,7 +50,7 @@ Suggests:
     knitr,
     magick,
     pkgload (>= 1.3.2.1),
-    quarto,
+    quarto (>= 1.5.0),
     rmarkdown,
     roxygen2 (>= 7.1.2),
     spelling (>= 1.2),

R/create.R

@@ -136,6 +136,13 @@ create_quarto_project <- function(
 ) {
   check_installed("quarto")
 
+  if (!quarto::quarto_available(error = FALSE)) {
+    ui_abort(c(
+      "x" = "The Quarto CLI must be available to create a Quarto project.",
+      "i" = "See {.url https://quarto.org/docs/get-started/}."
+    ))
+  }
+
   path <- user_path_prep(path)
   parent_dir <- path_dir(path)
   check_path_is_directory(parent_dir)

tests/testthat/test-create.R

@@ -151,6 +151,7 @@ test_that("we discourage project creation in home directory", {
 
 test_that("create_quarto_project() works for basic usage", {
   skip_if_not_installed("quarto")
+  skip_if_not(quarto::quarto_available(error = FALSE))
 
   dir <- create_local_quarto_project()
   expect_proj_file("_quarto.yml")