Nothing
rlang::on_load({
if (rlang::is_installed("shiny")) {
shiny::registerInputHandler("dm_nodes_edges", force = TRUE, shiny_input_dm_nodes_edges)
}
})
utils::globalVariables(c(
".",
"child_table",
"id",
"name",
"on_delete",
"op",
"parent_table",
"pk_col",
NULL
))
"%:::%" <- function(p, f) {
get(f, envir = asNamespace(p))
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.