inst/doc/golem.R

In brochure: Multipage 'Shiny' Apps

## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(collapse = TRUE, comment = "#>", eval = FALSE)

## -----------------------------------------------------------------------------
# golem::create_golem(file.path(tempdir(), "myapp"), project_hook = brochure::golem_hook)

## -----------------------------------------------------------------------------
# golem::add_module(name = "contact", module_template = brochure::new_page)

## -----------------------------------------------------------------------------
# mod_contact_ui <- function(id) {
#   ns <- NS(id)
#   tagList(
#     h1("Hello {brochure}!")
#   )
# }
# 
# mod_contact_server <- function(id) {
#   moduleServer(id, function(input, output, session) {
#     ns <- session$ns
#   })
# }
# 
# contact <- function(id = "contact", href = "/contact") {
#   page(
#     href = href,
#     ui = mod_contact_ui(id = id),
#     server = function(input, output, session) {
#       mod_contact_server(id = id)
#     }
#   )
# }

## -----------------------------------------------------------------------------
# run_app <- function(
#   onStart = NULL,
#   options = list(),
#   enableBookmarking = NULL,
#   ...
# ) {
#   with_golem_options(
#     app = brochureApp(
#       # Injected into every page: css, javascript, favicon
#       golem_add_external_resources(),
#       # One entry per page
#       home(),
#       contact(),
#       onStart = onStart,
#       options = options,
#       enableBookmarking = enableBookmarking
#     ),
#     golem_opts = list(...)
#   )
# }