dev/test_dev/test-mod_insert_md.R

source(file.path('../../R', 'mod_insert_md.R'), local=TRUE)$value
source(file.path('../../R', 'global.R'), local=TRUE)$value


ui <- fluidPage(
  mod_insert_md_ui('FAQ_MD')
)

# Define server logic to summarize and view selected dataset ----
server <- function(input, output, session) {
  mod_insert_md_server("FAQ_MD", URL_FAQ)
}


shinyApp(ui, server)
samWieczorek/Prostar.2.0 documentation built on Dec. 4, 2022, 11:53 a.m.