From 2402032731cbebb7e0f4020e48155d24b69579c7 Mon Sep 17 00:00:00 2001 From: Eugenia Date: Fri, 24 Jun 2022 13:05:09 +0200 Subject: [PATCH] "in Ethio-SPaRe" only for E-S mss https://github.com/BetaMasaheft/Documentation/issues/2154 --- db/apps/BetMasWeb/modules/apprest.xqm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/db/apps/BetMasWeb/modules/apprest.xqm b/db/apps/BetMasWeb/modules/apprest.xqm index 968c29f2c1..4923e3a9cf 100644 --- a/db/apps/BetMasWeb/modules/apprest.xqm +++ b/db/apps/BetMasWeb/modules/apprest.xqm @@ -651,7 +651,8 @@ return {for $change in $document//t:revisionDesc/t:change let $time := $change/@when let $author := editors:editorKey(string($change/@who)) - let $ES := if(contains($change/text(), 'Ethio-SPaRe team photographed the manuscript')) then () else if (xs:date($time) ge xs:date('2016-05-10')) then () else ' in Ethio-SPaRe ' + let $collection := $change/ancestor::t:TEI//t:collection + let $ES := if(contains($change/text(), 'Ethio-SPaRe team photographed the manuscript')) then () else if (xs:date($time) ge xs:date('2016-05-10')) then () else if (not(starts-with($collection/text(), 'Ethio-'))) then () else ' in Ethio-SPaRe ' order by $time descending return
  • @@ -659,7 +660,6 @@ return (' ' || $change/text() || $ES || ' on ' || format-date($time, '[D].[M].[Y]'))}
  • } -