inst/examples/mongo_app/app.R

In shiny.reglog: Optional Login and Registration Module System for ShinyApps

library(shiny.reglog)

mongo_default <- list(
  url = "mongodb://localhost",
  db = "reglog"
)

mongo_tables_create(
  mongo_url = mongo_default$url,
  mongo_db = mongo_default$db,
  verbose = F
)

shiny.reglog:::RegLogTest(
  dbConnector = RegLogMongoConnector$new(
    mongo_url = mongo_default$url,
    mongo_db = mongo_default$db
  ),
  mailConnector = RegLogConnector$new(),
  use_modals = F,
  onStart = {
    options("RegLogServer.logs_to_database" = 1)
    options("RegLogServer.logs" = 1)
  }
)