diff --git a/R/shiny-tree-view.R b/R/shiny-tree-view.R index 5c8c041..19de54c 100644 --- a/R/shiny-tree-view.R +++ b/R/shiny-tree-view.R @@ -17,7 +17,7 @@ #' @export xmltreeviewOutput <- function(outputId, width = '100%', height = '400px'){ htmlwidgets::shinyWidgetOutput(outputId, 'xmltreeview', width, height, - package = 'xmlview') + package = 'htmltidy') } #' @rdname xmltreeview-shiny @@ -25,4 +25,4 @@ xmltreeviewOutput <- function(outputId, width = '100%', height = '400px'){ renderXmltreeview <- function(expr, env = parent.frame(), quoted = FALSE) { if (!quoted) { expr <- substitute(expr) } # force quoted htmlwidgets::shinyRenderWidget(expr, xmltreeviewOutput, env, quoted = TRUE) -} \ No newline at end of file +} diff --git a/R/shiny.R b/R/shiny.R index 950a7e3..b2ecb85 100644 --- a/R/shiny.R +++ b/R/shiny.R @@ -6,7 +6,7 @@ #' @export xmlviewOutput <- function(outputId, width = '100%', height = '400px'){ htmlwidgets::shinyWidgetOutput(outputId, 'xmlview', width, height, - package = 'xmlview') + package = 'htmltidy') } #' Widget render function for use in Shiny diff --git a/R/xmltreeview.R b/R/xmltreeview.R index 0c2b6c0..cd46a3b 100644 --- a/R/xmltreeview.R +++ b/R/xmltreeview.R @@ -45,7 +45,7 @@ xml_tree_view <- function(doc=NULL, scroll=FALSE, x = params, width = width, height = height, - package = 'xmlview', + package = 'htmltidy', elementId = elementId ) diff --git a/R/xmlview.R b/R/xmlview.R index 9a8d94e..8bbe9ef 100644 --- a/R/xmlview.R +++ b/R/xmlview.R @@ -43,10 +43,10 @@ #' xml_view(xml_find_all(doc, ".//to"), style="github-gist") #' #' # some more complex daata -#' xml_view(read_xml(system.file("extdata/dwml.xml", package="xmlview"))) -#' xml_view(read_xml(system.file("extdata/getHistory.xml", package="xmlview")), +#' xml_view(read_xml(system.file("extdata/dwml.xml", package="htmltidy"))) +#' xml_view(read_xml(system.file("extdata/getHistory.xml", package="htmltidy")), #' "androidstudio") -#' xml_view(read_xml(system.file("extdata/input.xml", package="xmlview")), +#' xml_view(read_xml(system.file("extdata/input.xml", package="htmltidy")), #' "sunburst") #' #' # filter + apply an initial XPath query string @@ -92,7 +92,7 @@ xml_view <- function(doc, style="default", scroll=FALSE, add_filter=FALSE, params, width = width, height = height, - package = 'xmlview', + package = 'htmltidy', elementId = elementId ) @@ -115,6 +115,6 @@ html_view <- xml_view highlight_styles <- function() { gsub("\\.css$", "", grep("\\.css$", - list.files(system.file("htmlwidgets/lib/highlightjs/styles", package="xmlview")), + list.files(system.file("htmlwidgets/lib/highlightjs/styles", package="htmltidy")), value=TRUE)) } diff --git a/inst/htmlwidgets/xmlview.js b/inst/htmlwidgets/xmlview.js index ffc5fe0..36a78e7 100644 --- a/inst/htmlwidgets/xmlview.js +++ b/inst/htmlwidgets/xmlview.js @@ -163,4 +163,4 @@ HTMLWidgets.widget({ resize: function(el, width, height, instance) {}, -}); \ No newline at end of file +}); diff --git a/man/xml_view.Rd b/man/xml_view.Rd index 5fd0fe5..413cfa6 100644 --- a/man/xml_view.Rd +++ b/man/xml_view.Rd @@ -63,10 +63,10 @@ xml_view(doc, style="obsidian") xml_view(xml_find_all(doc, ".//to"), style="github-gist") # some more complex daata -xml_view(read_xml(system.file("extdata/dwml.xml", package="xmlview"))) -xml_view(read_xml(system.file("extdata/getHistory.xml", package="xmlview")), +xml_view(read_xml(system.file("extdata/dwml.xml", package="htmltidy"))) +xml_view(read_xml(system.file("extdata/getHistory.xml", package="htmltidy")), "androidstudio") -xml_view(read_xml(system.file("extdata/input.xml", package="xmlview")), +xml_view(read_xml(system.file("extdata/input.xml", package="htmltidy")), "sunburst") # filter + apply an initial XPath query string