Carry a a verbosity default already in the connection object
Change-Id: I8b0b0cb3ebbf5d92be8442366b5aaf6643e9431c
diff --git a/R/KorAPQuery.R b/R/KorAPQuery.R
index 1ca8123..28c508e 100644
--- a/R/KorAPQuery.R
+++ b/R/KorAPQuery.R
@@ -129,7 +129,7 @@
#' @export
setMethod("corpusQuery", "KorAPConnection",
function(kco, query, vc="", KorAPUrl, metadataOnly = TRUE, ql = "poliqarp", fields = defaultFields,
- accessRewriteFatal = TRUE, verbose=FALSE) {
+ accessRewriteFatal = TRUE, verbose = kco@verbose) {
defaultFields <- c("corpusSigle", "textSigle", "pubDate", "pubPlace",
"availability", "textClass", "snippet")
contentFields <- c("snippet")