diff --git a/R/gifti_xml_tools.R b/R/gifti_xml_tools.R index 8ecb003..7038356 100644 --- a/R/gifti_xml_tools.R +++ b/R/gifti_xml_tools.R @@ -12,11 +12,12 @@ #' @note Assumes that there already exists a global MetaData node. Also not that this is not supposed to be used for adding metadata to datarrays. #' #' @examples +#' \dontrun{ #' xmltree = gifti_xml(list(rep(3.1, 3L), matrix(seq(6)+0.1, nrow=2L))); #' newtree = gifti_xml_add_global_metadata(xmltree, list("User"="Me", "Weather"="Great")); #' gifti_xsd = "https://www.nitrc.org/frs/download.php/158/gifti.xsd"; #' xml2::xml_validate(newtree, xml2::read_xml(gifti_xsd)); -#' +#' } #' @export gifti_xml_add_global_metadata <- function(xmltree, metadata_named_list, as_cdata=TRUE) { xpath='.//MetaData'; diff --git a/man/gifti_xml_add_global_metadata.Rd b/man/gifti_xml_add_global_metadata.Rd index 0210e0b..86e2c88 100644 --- a/man/gifti_xml_add_global_metadata.Rd +++ b/man/gifti_xml_add_global_metadata.Rd @@ -23,9 +23,10 @@ Add metadata to GIFTI XML tree. Assumes that there already exists a global MetaData node. Also not that this is not supposed to be used for adding metadata to datarrays. } \examples{ +\dontrun{ xmltree = gifti_xml(list(rep(3.1, 3L), matrix(seq(6)+0.1, nrow=2L))); newtree = gifti_xml_add_global_metadata(xmltree, list("User"="Me", "Weather"="Great")); gifti_xsd = "https://www.nitrc.org/frs/download.php/158/gifti.xsd"; xml2::xml_validate(newtree, xml2::read_xml(gifti_xsd)); - +} }