]> git.donarmstrong.com Git - lilypond.git/commitdiff
don't output-empty-score-list unless \book is encountered.
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Sat, 6 Jan 2007 19:50:06 +0000 (20:50 +0100)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Sat, 6 Jan 2007 19:50:06 +0000 (20:50 +0100)
ly/lilypond-book-preamble.ly

index 063c69680b54aae89b801a2c2443ba4b0a286f99..a7bea92f1566be1148302a18d39b08fb26e6adb3 100644 (file)
@@ -7,23 +7,20 @@
   print-book-with-defaults-as-systems )
 
 #(define toplevel-book-handler
-
   (lambda ( . rest)
   (set! output-empty-score-list #f)
   (apply print-book-with-defaults rest)))
 
 #(define toplevel-music-handler
   (lambda ( . rest)
-   (set! output-empty-score-list #f)
    (apply collect-music-for-book rest)))
 
 #(define toplevel-score-handler
   (lambda ( . rest)
-   (set! output-empty-score-list #f)
    (apply collect-scores-for-book rest)))
+
 #(define toplevel-text-handler
   (lambda ( . rest)
-   (set! output-empty-score-list #f)
    (apply collect-scores-for-book rest)))
 
 #(set! output-empty-score-list #t)