X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Finit.ly;h=394b122f3168a0b4f2b2880ba6500fa4029a8fe7;hb=5d84bfad4626892bcffd05adcced53c8a2329047;hp=f906273c7f470b00a066439465c035c890359eed;hpb=7f48cb638958a728209577caa41bbaca8a2e4ef2;p=lilypond.git diff --git a/ly/init.ly b/ly/init.ly index f906273c7f..394b122f31 100644 --- a/ly/init.ly +++ b/ly/init.ly @@ -68,12 +68,12 @@ $(if (ly:get-option 'include-settings) (ly:book-add-score! book score)) (reverse! toplevel-scores))) (set! toplevel-scores (list)) - (book-handler (*parser*) book))) + (book-handler book))) ((or (pair? toplevel-scores) output-empty-score-list) (let ((book (apply ly:make-book $defaultpaper $defaultheader toplevel-scores))) (set! toplevel-scores (list)) - (book-handler (*parser*) book))))) + (book-handler book))))) #(if (eq? expect-error (ly:parser-has-error?)) (ly:parser-clear-error)