diff --git a/R/has.R b/R/has.R index f462b33..c8e0212 100644 --- a/R/has.R +++ b/R/has.R @@ -5,7 +5,7 @@ #' ada_has_credentials("https://user_1:password_1@example.org:8080/dir/../api?q=1#frag") #' @export ada_has_credentials <- function(url) { - url <- stringi::stri_enc_toutf8(url) + url <- utf8::as_utf8(url) vapply(url, function(x) vapply(url, function(x) Rcpp_ada_has_credentials(x, nchar(x, type = "bytes")), logical(1)), logical(1)) } @@ -16,7 +16,7 @@ ada_has_credentials <- function(url) { #' ada_has_empty_hostname("https://user_1:password_1@example.org:8080/dir/../api?q=1#frag") #' @export ada_has_empty_hostname <- function(url) { - url <- stringi::stri_enc_toutf8(url) + url <- utf8::as_utf8(url) vapply(url, function(x) Rcpp_ada_has_empty_hostname(x, nchar(x, type = "bytes")), logical(1)) } @@ -27,7 +27,7 @@ ada_has_empty_hostname <- function(url) { #' ada_has_hostname("https://user_1:password_1@example.org:8080/dir/../api?q=1#frag") #' @export ada_has_hostname <- function(url) { - url <- stringi::stri_enc_toutf8(url) + url <- utf8::as_utf8(url) vapply(url, function(x) Rcpp_ada_has_hostname(x, nchar(x, type = "bytes")), logical(1)) } @@ -38,7 +38,7 @@ ada_has_hostname <- function(url) { #' ada_has_non_empty_username("https://user_1:password_1@example.org:8080/dir/../api?q=1#frag") #' @export ada_has_non_empty_username <- function(url) { - url <- stringi::stri_enc_toutf8(url) + url <- utf8::as_utf8(url) vapply(url, function(x) Rcpp_ada_has_non_empty_username(x, nchar(x, type = "bytes")), logical(1)) } @@ -49,7 +49,7 @@ ada_has_non_empty_username <- function(url) { #' ada_has_non_empty_password("https://user_1:password_1@example.org:8080/dir/../api?q=1#frag") #' @export ada_has_non_empty_password <- function(url) { - url <- stringi::stri_enc_toutf8(url) + url <- utf8::as_utf8(url) vapply(url, function(x) Rcpp_ada_has_non_empty_password(x, nchar(x, type = "bytes")), logical(1)) } @@ -60,7 +60,7 @@ ada_has_non_empty_password <- function(url) { #' ada_has_port("https://user_1:password_1@example.org:8080/dir/../api?q=1#frag") #' @export ada_has_port <- function(url) { - url <- stringi::stri_enc_toutf8(url) + url <- utf8::as_utf8(url) vapply(url, function(x) Rcpp_ada_has_port(x, nchar(x, type = "bytes")), logical(1)) } @@ -71,7 +71,7 @@ ada_has_port <- function(url) { #' ada_has_hash("https://user_1:password_1@example.org:8080/dir/../api?q=1#frag") #' @export ada_has_hash <- function(url) { - url <- stringi::stri_enc_toutf8(url) + url <- utf8::as_utf8(url) vapply(url, function(x) Rcpp_ada_has_hash(x, nchar(x, type = "bytes")), logical(1)) } @@ -82,6 +82,6 @@ ada_has_hash <- function(url) { #' ada_has_search("https://user_1:password_1@example.org:8080/dir/../api?q=1#frag") #' @export ada_has_search <- function(url) { - url <- stringi::stri_enc_toutf8(url) + url <- utf8::as_utf8(url) vapply(url, function(x) Rcpp_ada_has_search(x, nchar(x, type = "bytes")), logical(1)) } diff --git a/man/ada_has_credentials.Rd b/man/ada_has_credentials.Rd index 1d7fae3..4f3bad1 100644 --- a/man/ada_has_credentials.Rd +++ b/man/ada_has_credentials.Rd @@ -7,7 +7,7 @@ ada_has_credentials(url) } \arguments{ -\item{url}{character. URL to be parsed} +\item{url}{character. one or more URL to be parsed} } \value{ logical diff --git a/man/ada_has_empty_hostname.Rd b/man/ada_has_empty_hostname.Rd index 24cbb34..d687961 100644 --- a/man/ada_has_empty_hostname.Rd +++ b/man/ada_has_empty_hostname.Rd @@ -7,7 +7,7 @@ ada_has_empty_hostname(url) } \arguments{ -\item{url}{character. URL to be parsed} +\item{url}{character. one or more URL to be parsed} } \value{ logical diff --git a/man/ada_has_hash.Rd b/man/ada_has_hash.Rd index bcbde35..9cbe36b 100644 --- a/man/ada_has_hash.Rd +++ b/man/ada_has_hash.Rd @@ -7,7 +7,7 @@ ada_has_hash(url) } \arguments{ -\item{url}{character. URL to be parsed} +\item{url}{character. one or more URL to be parsed} } \value{ logical diff --git a/man/ada_has_hostname.Rd b/man/ada_has_hostname.Rd index 7ce2ef7..6f1a8bc 100644 --- a/man/ada_has_hostname.Rd +++ b/man/ada_has_hostname.Rd @@ -7,7 +7,7 @@ ada_has_hostname(url) } \arguments{ -\item{url}{character. URL to be parsed} +\item{url}{character. one or more URL to be parsed} } \value{ logical diff --git a/man/ada_has_non_empty_password.Rd b/man/ada_has_non_empty_password.Rd index 9c2b8a2..5ee0fce 100644 --- a/man/ada_has_non_empty_password.Rd +++ b/man/ada_has_non_empty_password.Rd @@ -7,7 +7,7 @@ ada_has_non_empty_password(url) } \arguments{ -\item{url}{character. URL to be parsed} +\item{url}{character. one or more URL to be parsed} } \value{ logical diff --git a/man/ada_has_non_empty_username.Rd b/man/ada_has_non_empty_username.Rd index fd556ca..3cd2224 100644 --- a/man/ada_has_non_empty_username.Rd +++ b/man/ada_has_non_empty_username.Rd @@ -7,7 +7,7 @@ ada_has_non_empty_username(url) } \arguments{ -\item{url}{character. URL to be parsed} +\item{url}{character. one or more URL to be parsed} } \value{ logical diff --git a/man/ada_has_port.Rd b/man/ada_has_port.Rd index 112c066..994da5e 100644 --- a/man/ada_has_port.Rd +++ b/man/ada_has_port.Rd @@ -7,7 +7,7 @@ ada_has_port(url) } \arguments{ -\item{url}{character. URL to be parsed} +\item{url}{character. one or more URL to be parsed} } \value{ logical diff --git a/man/ada_has_search.Rd b/man/ada_has_search.Rd index b72c40e..09b854c 100644 --- a/man/ada_has_search.Rd +++ b/man/ada_has_search.Rd @@ -7,7 +7,7 @@ ada_has_search(url) } \arguments{ -\item{url}{character. URL to be parsed} +\item{url}{character. one or more URL to be parsed} } \value{ logical diff --git a/man/ada_url_parse.Rd b/man/ada_url_parse.Rd index a34b342..cab7156 100644 --- a/man/ada_url_parse.Rd +++ b/man/ada_url_parse.Rd @@ -7,7 +7,7 @@ ada_url_parse(url, decode = TRUE) } \arguments{ -\item{url}{character. URL to be parsed} +\item{url}{character. one or more URL to be parsed} \item{decode}{logical. Whether to decode the output (see \code{\link[utils:URLencode]{utils::URLdecode()}}), default to \code{TRUE}} }