Slim down buildWebUIRequestUrl function
Change-Id: I3da8e74388fc5a703bd83895cae6dea3741d4f59
diff --git a/man/KorAPQuery-class.Rd b/man/KorAPQuery-class.Rd
index 1f131a5..1c862cc 100644
--- a/man/KorAPQuery-class.Rd
+++ b/man/KorAPQuery-class.Rd
@@ -15,6 +15,7 @@
\alias{fetchRest}
\alias{frequencyQuery,KorAPConnection-method}
\alias{frequencyQuery}
+\alias{buildWebUIRequestUrlFromString}
\alias{buildWebUIRequestUrl}
\alias{format.KorAPQuery}
\alias{show,KorAPQuery-method}
@@ -75,6 +76,8 @@
...
)
+buildWebUIRequestUrlFromString(KorAPUrl, query, vc = "", ql = "poliqarp")
+
buildWebUIRequestUrl(
kco,
query = if (missing(KorAPUrl))
@@ -82,11 +85,7 @@
FALSE) else httr::parse_url(KorAPUrl)$query$q,
vc = if (missing(KorAPUrl)) "" else httr::parse_url(KorAPUrl)$query$cq,
KorAPUrl,
- metadataOnly = TRUE,
- ql = if (missing(KorAPUrl)) "poliqarp" else httr::parse_url(KorAPUrl)$query$ql,
- fields = c("corpusSigle", "textSigle", "pubDate", "pubPlace", "availability",
- "textClass", "snippet", "tokens"),
- accessRewriteFatal = TRUE
+ ql = if (missing(KorAPUrl)) "poliqarp" else httr::parse_url(KorAPUrl)$query$ql
)
\method{format}{KorAPQuery}(x, ...)