[zc-1086]: Delay importing of curl so that we can run in webR

NAMESPACE

@@ -576,7 +576,6 @@ importFrom(crayon,italic)
 importFrom(crayon,make_style)
 importFrom(crayon,red)
 importFrom(crayon,underline)
-importFrom(curl,curl_version)
 importFrom(grDevices,col2rgb)
 importFrom(grDevices,colors)
 importFrom(grDevices,rgb)

R/api.R

@@ -306,14 +306,13 @@ set_crunch_config <- function(cfg = c(
 #' globally with [set_crunch_config()].
 #' @export
 #' @keywords internal
-#' @importFrom curl curl_version
 crunch_user_agent <- function(...) {
     ## Cf. httr:::default_ua
     ## Include versions of any of these packages, if attached
     pkgs <- ua_packages[ua_packages %in% loadedNamespaces()]
     ua <- c(
         # Also include the libcurl version
-        paste0("libcurl/", curl_version()$version),
+        paste0("libcurl/", curl::curl_version()$version),
         mapply(packageUA, pkgs, names(pkgs)),
         # And any extra bits provided
         ...

R/crunch.R

@@ -3,6 +3,8 @@
 
 #' @importFrom httr config add_headers
 .onLoad <- function(lib, pkgname = "crunch") {
+    if (envOrOption("crunch.skip.startup", FALSE, expect_lgl = TRUE)) return()
+
     setIfNotAlready(
         httpcache.on = TRUE,
         crunch.api = "https://app.crunch.io/api/",

R/misc.R

@@ -216,6 +216,7 @@ vectorOrList <- function(obj, type) {
 #' | crunch.delimiter             | R_CRUNCH_DELIMITER             | "/"           | What to use as a delimiter when printing folder paths                       |
 #' | crunch.check.updates         | R_CRUNCH_CHECK_UPDATES         | TRUE          | Whether to check for updates to the crunch package                          |
 #' | crunch.debug                 | R_CRUNCH_DEBUG                 | FALSE         | Whether to print verbose information for debugging                          |
+#' | crunch.skip.startup          | R_CRUNCH_SKIP_STARTUP          | FALSE         | Whether to skip package startup (useful for webR)                           |
 #' | test.verify.ssl              | R_TEST_VERIFY_SSL              | TRUE          | Whether to verify ssl in curl during crunch tests                           |
 #' | crunch.stabilize.query       | R_CRUNCH_STABILIZE_QUERY       | FALSE         | Whether to stabilize JSON objects for saving as `httptest` objects          |
 #' | crunch.namekey.dataset       | R_CRUNCH_NAMEKEY_DATASET       | "alias"       | What variable identifier (alias or name) to use for a dataset's variables   |