try a different envvar

Author: jonkeane

ci/scripts/r_test.sh

@@ -60,7 +60,8 @@ if [ "$ARROW_R_DEV" = "TRUE" ]; then
   fi
 fi
 
-export _R_CHECK_CRAN_INCOMING_REMOTE_=FALSE
+export _R_CHECK_CRAN_INCOMING_REMOTE_=TRUE
+export _R_CHECK_CRAN_INCOMING_=TRUE
 # --run-donttest was used in R < 4.0, this is used now
 export _R_CHECK_DONTTEST_EXAMPLES_=TRUE
 # Not all Suggested packages are needed for checking, so in case they aren't installed don't fail
@@ -90,6 +91,8 @@ SCRIPT="as_cran <- !identical(tolower(Sys.getenv('NOT_CRAN')), 'true')
   if (as_cran) {
     args <- '--as-cran'
     build_args <- character()
+    # Attempt to install pandoc, this will only work on systems with apt
+    system(c('apt install -y pandoc'))
   } else {
     args <- c('--no-manual', '--ignore-vignettes')
     build_args <- '--no-build-vignettes'
@@ -110,6 +113,11 @@ SCRIPT="as_cran <- !identical(tolower(Sys.getenv('NOT_CRAN')), 'true')
       on.exit(tools::pskill(pid_flight), add = TRUE)
   }
 
+  run_donttest <- identical(tolower(Sys.getenv('_R_CHECK_DONTTEST_EXAMPLES_', 'true')), 'true')
+  if (run_donttest) {
+    args <- c(args, '--run-donttest')
+  }
+
   install_args <- Sys.getenv('INSTALL_ARGS')
   if (nzchar(install_args)) {
     args <- c(args, paste0('--install-args=\"', install_args, '\"'))
@@ -119,7 +127,7 @@ SCRIPT="as_cran <- !identical(tolower(Sys.getenv('NOT_CRAN')), 'true')
   print(build_args)
   print(args)
 
-  rcmdcheck::rcmdcheck(build_args = build_args, args = args, error_on = 'warning', check_dir = 'check', timeout = 3600)"
+  rcmdcheck::rcmdcheck(build_args = build_args, args = args, error_on = 'warning', check_dir = 'check', timeout = 3600, env = env)"
 echo "$SCRIPT" | ${R_BIN} --no-save
 
 AFTER=$(ls -alh ~/)