test_that("qgis_run() has a successful fallback if path is NULL", { skip_if_not(has_qgis()) qgisprocess_cache$path <- NULL qgisprocess_cache$version <- NULL expect_message(qgis_run(), "on the fly") expect_length(qgis_version(), 1L) # both qgis_version(query = TRUE) and qgis_path(query = TRUE) restore # the cache values: expect_false(is.null(qgisprocess_cache$version)) expect_false(is.null(qgisprocess_cache$path)) })