Open
Description
Great package, but it does not seem to parse the URL query correctly on the remote server. Here is the test code to replicate the problem. Try to run the app on the local server with query string e.g. http://localhost:8080/?mydata=1234 , try to run the same code on the remote server with URL query. In my tests, the query parameters parsed correctly on the local server but did not parse on the remote URL.
# Auth0 Testing App
library(shiny)
library(auth0)
ui <- fluidPage(
logoutButton(),
hr(),
h3("Query"),
verbatimTextOutput("query"),
h3("User Info"),
verbatimTextOutput("user_info"),
h3("Credentials Information"),
verbatimTextOutput("credential_info"),
h3("Environment Variables")
,verbatimTextOutput("envir")
)
# server with one observer that logouts
server <- function(input, output, session) {
# print user info
output$user_info <- renderPrint({
session$userData$auth0_info
})
output$credential_info <- renderPrint({
session$userData$auth0_credentials
})
# print env
output$envir <- renderPrint({
Sys.getenv()
})
# observe parse and print URL query
observe({
# get params from url
query <- parseQueryString( req( session$clientData$url_search ) )
output$query <- renderPrint({ query})
})
}
shinyAppAuth0(ui, server)