Wrap last remaining web api query example with dontrun
Change-Id: I06e09b8d1790190fd48ee064a80e3eaca42382b6
diff --git a/R/KorAPCorpusStats.R b/R/KorAPCorpusStats.R
index 2390d6b..a5665be 100644
--- a/R/KorAPCorpusStats.R
+++ b/R/KorAPCorpusStats.R
@@ -26,10 +26,12 @@
#' @return `KorAPCorpusStats` object with the slots `documents`, `tokens`, `sentences`, `paragraphs`
#'
#' @examples
-#' \donttest{corpusStats(new("KorAPConnection"))}
+#'
+#' \dontrun{
#'
#' kco <- new("KorAPConnection")
#' corpusStats(kco, "pubDate in 2017 & textType=/Zeitung.*/")
+#' }
#'
#' @aliases corpusStats
#' @export
diff --git a/cran-comments.md b/cran-comments.md
index 79dfac1..ad7c117 100644
--- a/cran-comments.md
+++ b/cran-comments.md
@@ -27,6 +27,7 @@
* Replaced our log.info function with log_info to avoid name clashes
* Reduced timeouts in tests to make sure they don't sum up to over 10s.
* Fixed dontrun position in misc.R example making sure that examples run in <5s.
+* Wrapped the last remaining web api query example in \dontrun.
### Old Notes
diff --git a/man/corpusStats-KorAPConnection-method.Rd b/man/corpusStats-KorAPConnection-method.Rd
index ce3fb8f..74aca03 100644
--- a/man/corpusStats-KorAPConnection-method.Rd
+++ b/man/corpusStats-KorAPConnection-method.Rd
@@ -23,9 +23,11 @@
Fetch information about a (virtual) corpus
}
\examples{
-\donttest{corpusStats(new("KorAPConnection"))}
+
+\dontrun{
kco <- new("KorAPConnection")
corpusStats(kco, "pubDate in 2017 & textType=/Zeitung.*/")
+}
}