Update test-extract_.R

traitecoevo · Nov 18, 2024 · 58e57a3 · 58e57a3
1 parent 079b89d
commit 58e57a3
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tests/testthat/test-extract_.R b/tests/testthat/test-extract_.R
@@ -191,7 +191,7 @@ test_that("Extraction of dataset was successful", {
 })
 
 test_that("Expect error if taxon_name column missing", {
-  traits_without_taxon_name <- database
+  traits_without_taxon_name <- extract_dataset(austraits_5.0.0_lite, dataset_id = dataset_id)
   traits_without_taxon_name$traits <- database$traits %>% dplyr::select(-taxon_name)
   expect_error((traits_without_taxon_name %>% extract_trait("leaf_area"))$traits)
 })