Skip to contents

Wraps shiny::observeEvent() to log an action whenever eventExpr fires. Reduces boilerplate when many UI events need to be audited.

Usage

regulog_observer(log, session, eventExpr, action, object, reason, ...)

Arguments

log

A regulog object.

session

The Shiny session object.

eventExpr

Reactive expression to observe.

action

Character. Action label.

object

Character or reactive. The object acted upon.

reason

Character or reactive. Business justification.

...

Additional arguments passed to log_action().

Value

A Shiny observer (invisibly).

Examples

if (FALSE) { # \dontrun{
regulog_observer(log, session,
  eventExpr = input$approve,
  action    = "approved",
  object    = reactive(input$selected_dataset),
  reason    = reactive(input$reason_text)
)
} # }