Set outputOtions at assignment

[calderonsamuel]

Currently this works (in this order):

output$some_ui<- renderUI({ ... })

outputOptions(output, "some_ui", suspendWhenHidden = FALSE)

And this also works:

observe(outputOptions(output, "some_ui", suspendWhenHidden = FALSE))

output$some_ui<- renderUI({ ... })

In both cases, the assignment and the setting of options need to happen in different places (also outputOptions() looks like a loose side effect).

Proposal

This could become:

output$some_ui<- renderUI({ ... }) |>
  setOutputOption(suspendWhenHidden = FALSE)

Which seems inline with recent additions such as bindEvent() and bindCache().

Or could be:

output$some_ui<- renderUI({ ... }, outputOptions = list(suspendWhenHidden = FALSE))