remove older shiny funcs

MarkEdmondson1234 · Jan 28, 2022 · 27f76fa · 27f76fa
1 parent e351682
commit 27f76fa
Show file tree

Hide file tree

Showing 20 changed files with 212 additions and 1,571 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: googleAuthR
 Type: Package
-Version: 1.4.2
+Version: 2.0.0
 Title: Authenticate and Create Google APIs
 Description: Create R functions that interact with OAuth2 Google APIs 
     <https://developers.google.com/apis-explorer/> easily,

diff --git a/NAMESPACE b/NAMESPACE
@@ -51,15 +51,10 @@ export(gar_shiny_login_ui)
 export(gar_shiny_ui)
 export(gar_token)
 export(gar_token_info)
-export(googleAuth)
-export(googleAuthUI)
-export(googleAuth_js)
-export(googleAuth_jsUI)
 export(googleSignIn)
 export(googleSignInUI)
 export(silent_auth)
 export(skip_if_no_env_auth)
-export(with_shiny)
 import(assertthat)
 import(cli)
 import(memoise)

diff --git a/NEWS.md b/NEWS.md
@@ -1,6 +1,6 @@
-# googleAuthR 1.4.2
+# googleAuthR 2.0.0
 
-* Removed `with_shiny()`
+* Removed `with_shiny()` and `googleAuth` modules that have been deprecated for a while -use `gar_shiny_*` instead.
 * Improved error handling with custom http errors
 
 # googleAuthR 1.4.1

diff --git a/R/batch.R b/R/batch.R
@@ -65,8 +65,7 @@ gar_batch <- function(function_list,
 
   parsed <- paste(c(parse_list, "--gar_batch--"), collapse="")
 
-  l <- list(parsed = parsed,
-            shiny_access_token = function_list[[1]]$shiny_access_token)
+  l <- list(parsed = parsed)
 
   ## call doHttrRequest with batched together functions
   cached_call <- !is.null(gar_cache_get_loc())

diff --git a/R/checks.R b/R/checks.R
@@ -128,8 +128,6 @@ token_exists <- function() {
 
 #' Check API data token
 #'
-#' @param shiny_access_token auth token
-#'
 #' @return boolean if it works.
 #'
 #' @keywords internal

diff --git a/R/gadget.R b/R/gadget.R
diff --git a/R/generator.R b/R/generator.R
@@ -140,7 +140,6 @@ gar_api_generator <- function(baseURI,
     if(any(with_gar_batch)){
       ## batching
       req <- list(req_url = req_url,
-                  shiny_access_token = shiny_access_token,
                   http_header = http_header,
                   the_body = the_body,
                   name = digest(c(req_url, the_body)))

diff --git a/R/shiny-auth.R b/R/shiny-auth.R