diff --git a/R/XenaHub-class.R b/R/XenaHub-class.R index 1563de6..0afc710 100644 --- a/R/XenaHub-class.R +++ b/R/XenaHub-class.R @@ -346,7 +346,7 @@ XenaDataUpdate <- function(saveTolocal = TRUE) { # nocov start message("=> Saving...") data_dir <- base::system.file("data", package = "UCSCXenaTools") if (dir.exists(data_dir)) { - save(XenaData, file = file.path(data_dir, "XenaData.rda")) + save(XenaData, file = file.path(data_dir, "XenaData.rda"), compress = "xz") } else { message("There is no data directory ", data_dir) message("Please check it.") diff --git a/data/XenaData.rda b/data/XenaData.rda index 1280b68..3ef8e19 100644 Binary files a/data/XenaData.rda and b/data/XenaData.rda differ diff --git a/tests/testthat/test-full-tests.R b/tests/testthat/test-full-tests.R index 8274071..c5900f6 100644 --- a/tests/testthat/test-full-tests.R +++ b/tests/testthat/test-full-tests.R @@ -12,18 +12,19 @@ xe3 <- XenaHub( all_hosts <- c( - "https://ucscpublic.xenahubs.net", - "https://tcga.xenahubs.net", - "https://gdc.xenahubs.net", - "https://icgc.xenahubs.net", - "https://toil.xenahubs.net", - "https://pancanatlas.xenahubs.net", - "https://xena.treehouse.gi.ucsc.edu:443", - "https://pcawg.xenahubs.net", - "https://atacseq.xenahubs.net", - "https://singlecellnew.xenahubs.net", - "https://kidsfirst.xenahubs.net" - #"https://tdi.xenahubs.net" + "https://ucscpublic.xenahubs.net", + "https://tcga.xenahubs.net", + "https://gdc.xenahubs.net", + "https://gdcV18.xenahubs.net", + "https://icgc.xenahubs.net", + "https://toil.xenahubs.net", + "https://pancanatlas.xenahubs.net", + "https://xena.treehouse.gi.ucsc.edu:443", + "https://pcawg.xenahubs.net", + "https://atacseq.xenahubs.net", + "https://singlecellnew.xenahubs.net", + "https://kidsfirst.xenahubs.net", + "https://tdi.xenahubs.net" )