Cleanup tests; remove unnecessary library()

Author: HenrikBengtsson

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: future.tests
 Title: Test Suite for 'Future API' Backends
-Version: 0.9.0-9006
+Version: 0.9.0-9007
 Authors@R: c(
   person("Henrik", "Bengtsson", role = c("aut", "cre", "cph"), email = "[email protected]"),
   person(family = "The R Consortium", comment = "Project was awarded an Infrastructure Steering Committee (ISC) grant in 2017", role = "fnd"))

inst/testme/test-Test-class.R

@@ -2,20 +2,16 @@
 #' @tags detritus-files
 #' @tags detritus-connections
 library(future.tests)
-library(future)
 
 tests <- load_tests()
 message("Number of tests: ", length(tests))
 
 df_tests <- do.call(rbind, tests)
 print(df_tests)
 
-message("Run first three tests ...")
-
-library(future)
 
+message("Run first three tests ...")
 tests_3 <- head(tests, 3L)
-
 ## Create default values
 defaults <- lapply(tests_3, FUN = function(test) test[["args"]])
 defaults <- do.call(c, unname(defaults))

inst/testme/test-one-test.R

@@ -1,5 +1,4 @@
 library(future.tests)
-library(future)
 
 tests <- load_tests()
 

inst/testme/test-test_db.R

@@ -1,5 +1,4 @@
 library(future.tests)
-library(future)
 
 tests <- load_tests()
 message("Number of tests: ", length(tests))