ability to add CDATA to nodes

[jread-usgs]

xml_new_document() %>% xml_add_child('style', type='text/css', '![CDATA[<d></d>]]')

will leave out the CDATA.

This functionality would be useful for css and other things that we may be sticking in xml.

[jimhester]

Now possible

library(xml2)
library(magrittr)
d <- xml_new_document() %>%
  xml_add_child('style', type='text/css') %>%
  xml_add_child(xml_cdata('<d></d>')) %>%
  xml_root()
as.character(d)
#> [1] "<?xml version=\"1.0\"?>\n<style type=\"text/css\"><![CDATA[<d></d>]]></style>\n"

[jread-usgs]

terrific!