From 2c0d469078e112fdd7343acfeed2ffb6e7becfbf Mon Sep 17 00:00:00 2001
From: Carsten Milling <cmil@hashtable.de>
Date: Sun, 12 Nov 2023 03:34:35 +0100
Subject: [PATCH] Fix extraction of multiple paragraphs in corpus description

---
 modules/util.xqm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/modules/util.xqm b/modules/util.xqm
index fec50b74..25ad572e 100644
--- a/modules/util.xqm
+++ b/modules/util.xqm
@@ -464,7 +464,8 @@ declare function dutil:get-corpus-info(
   let $projectDesc := $header/tei:encodingDesc/tei:projectDesc
   let $licence := $header//tei:availability/tei:licence
   let $description := if ($projectDesc) then (
-    for $p in $projectDesc/tei:p return local:markdown($p)
+    let $paras := for $p in $projectDesc/tei:p return local:markdown($p)
+    return string-join($paras, "&#10;&#10;")
   ) else ()
   return if ($header) then (
     map:merge((