fix #110

eblondel · Jul 12, 2023 · d8e43a0 · d8e43a0
1 parent 5daee68
commit d8e43a0
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/WFSFeatureType.R b/R/WFSFeatureType.R
@@ -394,7 +394,7 @@ WFSFeatureType <- R6Class("WFSFeatureType",
         ),      
         sf::st_read(destfile, quiet = TRUE)
       )
-      if(self$hasGeometry()){
+      if(self$hasGeometry()) if(self$getGeometryType() %in% colnames(ftFeatures)){
         if(is.na(st_crs(ftFeatures))) st_crs(ftFeatures) <- self$getFeaturesCRS(obj)
         if(is.na(st_crs(ftFeatures))) st_crs(ftFeatures) <- self$getDefaultCRS()
       }