inst/doc/events.R

## ---- eval=FALSE--------------------------------------------------------------
#  # Add a handler to the 'new-event' event
#  id <- app$on('new-event', function() {
#    message('Event fired')
#  })
#  
#  # Trigger the event
#  app$trigger('new-event')
#  
#  # Remove the handler
#  app$off(id)

## ---- eval=FALSE--------------------------------------------------------------
#  app$trigger_dir <- '/some/path/to/dir/'

## ---- eval=FALSE--------------------------------------------------------------
#  saveRDS(list(arg1 = 'test'), '/some/path/to/dir/external-event.rds')

Try the fiery package in your browser

Any scripts or data that you put into this service are public.

fiery documentation built on March 31, 2023, 6:54 p.m.