inst/examples/SuperTinyIcons/global.R

js <- function(icon){
  sprintf(
    "() => {
      setState(\'icon\', \'%s\');
      getHookProperty(\'disclosure\', \'onOpen\')();
    }",
    paste0(icon, "TinyIcon")
  )
}
stla/shinyChakraUI documentation built on Jan. 8, 2022, 9:38 a.m.