diff --git a/R/natural-language.R b/R/natural-language.R index e3f8e47..55f0582 100644 --- a/R/natural-language.R +++ b/R/natural-language.R @@ -78,7 +78,7 @@ gl_nlp <- function(string, language <- match.arg(language) encodingType <- match.arg(encodingType) # global env set in version.R - version <- .glr$version + version <- get_version() api_results <- map(string, gl_nlp_single, nlp_type = nlp_type, diff --git a/R/version.R b/R/version.R index 432966f..ba5088b 100644 --- a/R/version.R +++ b/R/version.R @@ -1,4 +1,10 @@ # used to specify the API endpoint - on GitHub beta, on CRAN, stable -.glr <- new.env(parent = emptyenv()) -.glr$version <- "v1" +get_version <- function(){ + if(grepl("\\.9...$", packageVersion("googleLanguageR"))){ + version <- "v1beta2" + } else { + version <- "v1" + } + version +}