Fix dontrun position in misc.R

Change-Id: Ice5166ae5efe4ff51ceaa19957558bea88482b6e
diff --git a/R/misc.R b/R/misc.R
index bd5cdb6..5a29f02 100644
--- a/R/misc.R
+++ b/R/misc.R
@@ -111,9 +111,9 @@
 #' @rdname misc-functions
 #'
 #' @examples
+#' \dontrun{
 #' library(ggplot2)
 #' kco <- new("KorAPConnection", verbose=TRUE)
-#' \dontrun{
 #'
 #' expand_grid(condition = c("textDomain = /Wirtschaft.*/", "textDomain != /Wirtschaft.*/"),
 #'             year = (2005:2011)) %>%
diff --git a/cran-comments.md b/cran-comments.md
index d6e3d81..79dfac1 100644
--- a/cran-comments.md
+++ b/cran-comments.md
@@ -26,6 +26,7 @@
   <https://github.com/KorAP/RKorAPClient/commit/f650629fa69ab10979f2ffe2652da77599caaf70>
 * 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.
 
 ### Old Notes
 
diff --git a/man/misc-functions.Rd b/man/misc-functions.Rd
index f0ae3c2..d9433a3 100644
--- a/man/misc-functions.Rd
+++ b/man/misc-functions.Rd
@@ -98,9 +98,9 @@
 queryStringToLabel(c("[marmot/m=mood:subj]", "[marmot/m=mood:ind]"))
 queryStringToLabel(c("wegen dem [tt/p=NN]", "wegen des [tt/p=NN]"))
 
+\dontrun{
 library(ggplot2)
 kco <- new("KorAPConnection", verbose=TRUE)
-\dontrun{
 
 expand_grid(condition = c("textDomain = /Wirtschaft.*/", "textDomain != /Wirtschaft.*/"),
             year = (2005:2011)) \%>\%