diff --git a/R/GMLAbstractCoordinateOperation.R b/R/GMLAbstractCoordinateOperation.R
index 2b2f0649..cb26f332 100644
--- a/R/GMLAbstractCoordinateOperation.R
+++ b/R/GMLAbstractCoordinateOperation.R
@@ -17,7 +17,7 @@
 #'  \item{\code{new(xml, defaults, id)}}{
 #'    This method is used to instantiate a GML Abstract CRS
 #'  }
-#'  \item{\Code{setVersion(version)}}{
+#'  \item{\code{setVersion(version)}}{
 #'    Sets version
 #'  }
 #'  \item{\code{addAccuracy(accuracy)}}{
diff --git a/R/GMLElement.R b/R/GMLElement.R
index 27a85ead..58854f92 100644
--- a/R/GMLElement.R
+++ b/R/GMLElement.R
@@ -60,7 +60,11 @@ GMLElement <- R6Class("GMLElement",
               childName <- names(children)[i]
               childElem <- GMLElement$new(element = childName)
               childElem$decode(xml = childXML)
-              self[[childName]] <- childElem
+              if(is(self[[childName]], "list")){
+                self[[childName]] <- c(self[[childName]], childElem)
+              }else{
+                self[[childName]] <- childElem
+              }
             }
           }
         }
diff --git a/man/GMLAbstractCoordinateOperation.Rd b/man/GMLAbstractCoordinateOperation.Rd
index bc2d2835..26f307a5 100644
--- a/man/GMLAbstractCoordinateOperation.Rd
+++ b/man/GMLAbstractCoordinateOperation.Rd
@@ -31,7 +31,7 @@ GMLAbstractCoordinateOperation
  \item{\code{new(xml, defaults, id)}}{
    This method is used to instantiate a GML Abstract CRS
  }
- \item{\Code{setVersion(version)}}{
+ \item{\code{setVersion(version)}}{
    Sets version
  }
  \item{\code{addAccuracy(accuracy)}}{