boernel/lilypond-common-includes
14
0
Fork 0
Code Issues 17 Pull Requests 1 Packages Projects Releases Wiki Activity

fix includeFromSong

Browse Source
This commit is contained in:
tux
2025-06-17 09:01:24 +02:00
parent a288248da3
commit 19f6046333
1 changed files with 9 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
include_from_song.ily
View File

@ -3,5 +3,13 @@ includeFromSong =
(let ((noDefaultOutputBackup noDefaultOutput)) (let ((noDefaultOutputBackup noDefaultOutput))
(set! noDefaultOutput #t) (set! noDefaultOutput #t)
(ly:parser-parse-string (ly:parser-clone) (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))) (set! noDefaultOutput noDefaultOutputBackup)))