From 19f6046333d03975600fb05628982f515109624d Mon Sep 17 00:00:00 2001
From: tux <tux@goldenerreiter.org>
Date: Tue, 17 Jun 2025 09:01:24 +0200
Subject: [PATCH] fix includeFromSong

---
 include_from_song.ily | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/include_from_song.ily b/include_from_song.ily
index 0776331..d5034c5 100644
--- a/include_from_song.ily
+++ b/include_from_song.ily
@@ -3,5 +3,13 @@ includeFromSong =
   (let ((noDefaultOutputBackup noDefaultOutput))
     (set! noDefaultOutput #t)
     (ly:parser-parse-string (ly:parser-clone)
-      (ly:format "\\include \"~a\"" filename))
+      (ly:format "\\include \"~a\""
+      (string-append
+        (dirname (dirname (current-filename)))
+        file-name-separator-string
+        "lilypond-song-includes"
+        file-name-separator-string
+        "liedbausteine"
+        file-name-separator-string
+        filename)))
     (set! noDefaultOutput noDefaultOutputBackup)))
\ No newline at end of file