From 38e0da918a1574a0e93c65a7ae9bf67f7446ceca Mon Sep 17 00:00:00 2001
From: eblondel <emmanuel.blondel1@gmail.com>
Date: Mon, 29 Jan 2024 23:20:54 +0100
Subject: [PATCH] #62 fix dimension decoding from xml

---
 R/GSDimension.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/GSDimension.R b/R/GSDimension.R
index dd04186..6d00a54 100644
--- a/R/GSDimension.R
+++ b/R/GSDimension.R
@@ -51,7 +51,7 @@ GSDimension <- R6Class("GSDimension",
       units = xml2::xml_find_first(xml, "//units") %>% xml2::xml_text()
       self$setUnit(units)
       unitSymbol = xml2::xml_find_first(xml, "//unitSymbol") %>% xml2::xml_text()
-      self$setUnitSymbol(unitSymbol)
+      if(!is.na(unitSymbol)) self$setUnitSymbol(unitSymbol)
     },
     
     #'@description Set enabled