Nothing
#' Cognito Shiny Module UI
#'
#' A Shiny UI function to be used to implement Amazon Cognito in your shiny app.
#' This UI loads the required JS.
#'
#' @param id character - Namespace ID
#' @examples
#' cognito_ui("demo")
#' @return A Shiny UI
#' @import shiny
#' @rawNamespace import(shinyjs, except = runExample)
#' @author Pablo Pagnone
#' @export
cognito_ui <- function(id){
ns <- NS(id)
jscode <- "Shiny.addCustomMessageHandler('redirect', function(url) { window.location = url;});"
addResourcePath('cognitor', system.file('', package='cognitoR'))
fluidRow(
shinyjs::useShinyjs(),
HTML('<div id="cognitor_loader"></div>'),
tags$link(rel = "stylesheet", type = "text/css", href = "cognitor/css/loader.css"),
tags$head(tags$script(jscode)),
cookie_ui(ns("cookiemod"))
)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.