]> git.donarmstrong.com Git - lilypond.git/blobdiff - ly/init.ly
Issue 5167/6: Changes: show \markup xxx = ... \etc assignments
[lilypond.git] / ly / init.ly
index f906273c7f470b00a066439465c035c890359eed..394b122f3168a0b4f2b2880ba6500fa4029a8fe7 100644 (file)
@@ -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)