From 5e4f3b2d91257eec30b349a5b57e20cc6f1ce45e Mon Sep 17 00:00:00 2001
From: eblondel <emmanuel.blondel1@gmail.com>
Date: Thu, 7 Sep 2023 09:16:49 +0200
Subject: [PATCH] fix #358 missing collapse

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

diff --git a/R/geoflow_entity.R b/R/geoflow_entity.R
index 694a0c27..d1b429fa 100644
--- a/R/geoflow_entity.R
+++ b/R/geoflow_entity.R
@@ -2009,7 +2009,7 @@ geoflow_entity <- R6Class("geoflow_entity",
           if(!is.null(format$description)) outformat <- paste0(outformat, "[\"", format$description, "\"]")
           if(!is.null(format$uri)) outformat <- paste(outformat, format$uri, sep = "@")
           return(outformat)
-        })),
+        }),collapse=line_separator),
         #Relation
         Relation = paste0(sapply(self$relations,function(relation){
           outrel <- paste0(relation$key,":\"",relation$name,"\"")