fix includeFromSong
This commit is contained in:
1 parent
a288248da3
commit
19f6046333
1 file changed
+9
-1
@@ -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)))
|
||||||
Reference in new issue
Block a user