diff --git a/DESCRIPTION b/DESCRIPTION index 8044c16..4e7aabe 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,8 +1,8 @@ Package: geosapi Type: Package Title: GeoServer REST API R Interface -Version: 0.7 -Date: 2024-02-27 +Version: 0.7-1 +Date: 2024-03-11 Authors@R: c(person("Emmanuel", "Blondel", role = c("aut", "cre"), email = "emmanuel.blondel1@gmail.com", comment = c(ORCID = "0000-0002-5870-5762"))) Maintainer: Emmanuel Blondel Description: Provides an R interface to the GeoServer REST API, allowing to upload diff --git a/NEWS.md b/NEWS.md index 760835a..8391f2c 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,3 +1,9 @@ +## [geosapi 0.7-1](https://cran.r-project.org/package=geosapi) | [![CRAN_Status_Badge](https://img.shields.io/badge/CRAN-published-blue.svg)](https://cran.r-project.org/package=geosapi) + +**Corrections** + +* [#73](https://github.com/eblondel/geosapi/issues/73) Bad XML encoding for entryset + ## [geosapi 0.7](https://cran.r-project.org/package=geosapi) | [![CRAN_Status_Badge](https://img.shields.io/badge/CRAN-published-blue.svg)](https://cran.r-project.org/package=geosapi) **Enhancements** diff --git a/R/GSRESTResource.R b/R/GSRESTResource.R index 6021861..30935c4 100644 --- a/R/GSRESTResource.R +++ b/R/GSRESTResource.R @@ -60,11 +60,12 @@ GSRESTResource <- R6Class("GSRESTResource", itemValue <- items[[itemName]] if(is.logical(itemValue)){ itemValue <- tolower(as.character(itemValue)) - xml2::xml_text(item) <- itemValue } if(is(itemValue, "GSRESTResource")){ itemValue <- itemValue$encode() item %>% xml2::xml_add_child(itemValue) + }else{ + xml2::xml_text(item) <- itemValue } rootXML %>% xml2::xml_add_child(item) } diff --git a/README.md b/README.md index bb8b163..9a70c73 100644 --- a/README.md +++ b/README.md @@ -4,7 +4,7 @@ [![Build Status](https://github.com/eblondel/geosapi/actions/workflows/r-cmd-check.yml/badge.svg?branch=master)](https://github.com/eblondel/geosapi/actions/workflows/r-cmd-check.yml) [![CRAN_Status_Badge](http://www.r-pkg.org/badges/version/geosapi)](https://cran.r-project.org/package=geosapi) [![cran checks](https://badges.cranchecks.info/worst/geosapi.svg)](https://cran.r-project.org/web/checks/check_results_geosapi.html) -[![Github_Status_Badge](https://img.shields.io/badge/Github-0.7-blue.svg)](https://github.com/eblondel/geosapi) +[![Github_Status_Badge](https://img.shields.io/badge/Github-0.7--1-blue.svg)](https://github.com/eblondel/geosapi) [![DOI](https://zenodo.org/badge/DOI/10.5281/zenodo.1184895.svg)](https://doi.org/10.5281/zenodo.1184895) ``geosapi``: GeoServer REST API R Interface