7 lines
284 B
Plaintext
7 lines
284 B
Plaintext
includeFromSong =
|
|
#(define-void-function (filename) (string?)
|
|
(let ((noDefaultOutputBackup noDefaultOutput))
|
|
(set! noDefaultOutput #t)
|
|
(ly:parser-parse-string (ly:parser-clone)
|
|
(ly:format "\\include \"~a\"" filename))
|
|
(set! noDefaultOutput noDefaultOutputBackup))) |