From: John Mandereau <john.mandereau@gmail.com>
Date: Mon, 25 Feb 2008 13:34:26 +0000 (+0100)
Subject: Try to use base name of regtests file names
X-Git-Tag: release/2.11.42-1~30
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=7e00360a3fa89bcecaacfe00f5fbe3ea13e21037;p=lilypond.git

Try to use base name of regtests file names
---

diff --git a/buildscripts/lys-to-tely.py b/buildscripts/lys-to-tely.py
index c026522434..236aacb920 100644
--- a/buildscripts/lys-to-tely.py
+++ b/buildscripts/lys-to-tely.py
@@ -80,6 +80,14 @@ for opt in options:
     else:
         raise Exception ('unknown option: ' + o)
 
+def shorten_file_name (n):
+    # ugh, regtests file names appear as full paths in GUB builds
+    # we try to do something here
+    b = os.path.basename (n)
+    if os path.exists (b):
+        return b
+    return n
+
 def name2line (n):
     # UGR
     s = r"""
@@ -98,6 +106,7 @@ if files:
     name = os.path.basename (name)
     template = template % vars ()
 
+    files = map (shorten_file_name, files)
     files.sort ()
     s = "\n".join (map (name2line, files))
     s = template.replace (include_snippets, s, 1)