Fix picking up vc definition from KorAP-URL in corpusQuery
Change-Id: I2e19b2f46ff5994c83b5359846d991c0f6b79974
diff --git a/R/KorAPQuery.R b/R/KorAPQuery.R
index 723ef3e..0b9ee7c 100644
--- a/R/KorAPQuery.R
+++ b/R/KorAPQuery.R
@@ -141,7 +141,7 @@
}
if (missing(query)) {
query <- QueryParameterFromUrl(KorAPUrl, "q")
- vc <- QueryParameterFromUrl(KorAPUrl, "vc")
+ vc <- QueryParameterFromUrl(KorAPUrl, "cq")
ql <- QueryParameterFromUrl(KorAPUrl, "ql")
}
request <- paste0('?q=', URLencode(query, reserved=TRUE),