R/daemons_server.R

Defines functions daemons_server

daemons_server<-function(){
E<-new.env()
E$txt<-NULL
E$funs<-list("..."=function(){print("welcome!")},"dqc"=dryqc::cron,"mv"=details::cron)
server <- function(input, output, session) {
    observeEvent(input$drop, {
        {
            E$funs[[input$drop]]()

        }
    })
}
}
JARS3N/LiveLongAndProsper documentation built on June 21, 2020, 12:49 p.m.