diff --git a/inst/shiny/modules/slope_selector.R b/inst/shiny/modules/slope_selector.R index dbbf3b1c..ff9e8561 100644 --- a/inst/shiny/modules/slope_selector.R +++ b/inst/shiny/modules/slope_selector.R @@ -100,6 +100,9 @@ slope_selector_server <- function( moduleServer(id, function(input, output, session) { log_trace("{id}: Attaching server") + # HACK: workaround to avoid plotly_click not being registered warning + session$userData$plotlyShinyEventIDs <- "plotly_click-A" + current_page <- reactiveVal(1) #' updating current page based on user input