From 45365738de879795474f3b9471616e7e116877d2 Mon Sep 17 00:00:00 2001
From: ShixiangWang <wangshx@shanghaitech.edu.cn>
Date: Mon, 25 Nov 2019 16:36:38 +0800
Subject: [PATCH] Release v1.2.9

---
 CRAN-RELEASE | 4 ++--
 DESCRIPTION  | 2 +-
 NEWS.md      | 7 +++++++
 R/fetch.R    | 4 ++--
 man/fetch.Rd | 4 ++--
 5 files changed, 14 insertions(+), 7 deletions(-)

diff --git a/CRAN-RELEASE b/CRAN-RELEASE
index 0e4d049..d42195e 100644
--- a/CRAN-RELEASE
+++ b/CRAN-RELEASE
@@ -1,2 +1,2 @@
-This package was submitted to CRAN on 2019-11-18.
-Once it is accepted, delete this file and tag the release (commit b716b211a6).
+This package was submitted to CRAN on 2019-11-25.
+Once it is accepted, delete this file and tag the release (commit 06ab74640e).
diff --git a/DESCRIPTION b/DESCRIPTION
index 05773cd..ad41811 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: UCSCXenaTools
 Title: Download and Explore Datasets from UCSC Xena Data Hubs
-Version: 1.2.8
+Version: 1.2.9
 Authors@R: c(person("Shixiang", "Wang", email = "w_shixiang@163.com", role = c("aut", "cre"), 
             comment = c(ORCID = "0000-0001-9855-7357")),
             person("Xue-Song", "Liu", role = "aut", comment = c(ORCID = "0000-0002-7736-0077")),
diff --git a/NEWS.md b/NEWS.md
index d2b0c8b..cd7c75c 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -1,3 +1,10 @@
+# v1.2.9
+
+## Bug fixes
+
+* Removed `fetch()` check
+* Addressed #16, #17, #18
+
 # v1.2.8
 
 ## Bug fixes
diff --git a/R/fetch.R b/R/fetch.R
index 49ded41..474fe02 100644
--- a/R/fetch.R
+++ b/R/fetch.R
@@ -39,16 +39,16 @@
 #' probes <- c("ENSG00000282740.1", "ENSG00000000005.5", "ENSG00000000419.12")
 #' genes <- c("TP53", "RB1", "PIK3CA")
 #'
+#' \donttest{
 #' # Fetch samples
 #' fetch_dataset_samples(host, dataset, 2)
 #' # Fetch identifiers
-#' \donttest{
 #' fetch_dataset_identifiers(host, dataset)
-#' }
 #' # Fetch expression value by probes
 #' fetch_dense_values(host, dataset, probes, samples, check = FALSE)
 #' # Fetch expression value by gene symbol (if the dataset has probeMap)
 #' fetch_dense_values(host, dataset, genes, samples, check = FALSE, use_probeMap = TRUE)
+#' }
 #' @export
 fetch <- function(host, dataset) {
   message("This function is used to build consistent documentation.")
diff --git a/man/fetch.Rd b/man/fetch.Rd
index 4b9506e..60e1ba2 100644
--- a/man/fetch.Rd
+++ b/man/fetch.Rd
@@ -90,14 +90,14 @@ samples <- c("TCGA-02-0047-01", "TCGA-02-0055-01", "TCGA-02-2483-01", "TCGA-02-2
 probes <- c("ENSG00000282740.1", "ENSG00000000005.5", "ENSG00000000419.12")
 genes <- c("TP53", "RB1", "PIK3CA")
 
+\donttest{
 # Fetch samples
 fetch_dataset_samples(host, dataset, 2)
 # Fetch identifiers
-\donttest{
 fetch_dataset_identifiers(host, dataset)
-}
 # Fetch expression value by probes
 fetch_dense_values(host, dataset, probes, samples, check = FALSE)
 # Fetch expression value by gene symbol (if the dataset has probeMap)
 fetch_dense_values(host, dataset, genes, samples, check = FALSE, use_probeMap = TRUE)
 }
+}