From c571a5a8b9487b6568c94ad50a91088b99665dde Mon Sep 17 00:00:00 2001
From: bwbohl <b.w.bohl@gmail.com>
Date: Thu, 19 Dec 2024 09:13:18 +0100
Subject: [PATCH] getLinkTarget.xql: add support for MEI3 and older in function
 getWorkTitle

---
 add/data/xql/getLinkTarget.xql | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

diff --git a/add/data/xql/getLinkTarget.xql b/add/data/xql/getLinkTarget.xql
index 4567d468..47f4be40 100644
--- a/add/data/xql/getLinkTarget.xql
+++ b/add/data/xql/getLinkTarget.xql
@@ -158,8 +158,16 @@ declare function local:getWindowTitle($doc as node()+, $type as xs:string) as xs
     
     (: Work :)
     if ($type = 'work') then
-    (: will fail for MEI v3 or older :)
-        eutil:getLocalizedTitle(($doc//mei:work)[1], $lang)
+        
+        let $workTitleContainer := (
+            (: MEI 3 and older :)
+            ($doc//mei:work)[1]/mei:titleStmt,
+            (: MEI 4 and newer :)
+            ($doc//mei:work)[1]
+        )[1]
+    
+        return
+            eutil:getLocalizedTitle($workTitleContainer, $lang)
     
     (: Recording :)
     else if (exists($doc//mei:mei) and exists($doc//mei:recording)) then