R/mod_about.R

In Rosalien/dataAccessApp: Data Access shiny app

#' about UI Function
#'
#' @description A shiny Module.
#'
#' @param id,input,output,session Internal parameters for {shiny}.
#'
#' @noRd 
#'
#' @importFrom shiny NS tabPanel includeMarkdown moduleServer
#' 
mod_aboutUI <- function(id){
	ns <- NS(id)
    tabPanel("About",
    	includeMarkdown("inst/app/www/md/about_en.md"))
}

#' about Server Function
#'
#' @noRd 
mod_about <- function(id){
	moduleServer(
		id,
		function(input, output, session){
		}
		)
}#Fin du module