X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Finit.ly;h=fa1dbe5993eba6d25504d600865e1c5f91d85617;hb=35d76f132990937989036d9a88f03def876b9600;hp=93048100aea29d1a662b991db8baeaedb4170afe;hpb=b3f0c2f6c352a850f03dc44a947776199eb3fa0b;p=lilypond.git

diff --git a/ly/init.ly b/ly/init.ly
index 93048100ae..fa1dbe5993 100644
--- a/ly/init.ly
+++ b/ly/init.ly
@@ -12,15 +12,21 @@
 #(ly:set-option 'old-relative #f)
 #(define toplevel-scores (list))
 #(define toplevel-bookparts (list))
-#(define output-count 0) 
 #(define $defaultheader #f)
 #(define $current-book #f)
 #(define $current-bookpart #f)
 #(define version-seen #f)
-#(define expect-error #f) 
+#(define expect-error #f)
 #(define output-empty-score-list #f)
 #(define output-suffix #f)
+#(define book-filename #f)
+#(define book-output-suffix #f)
 #(use-modules (scm clip-region))
+
+#(if (ly:get-option 'include-settings)
+  (ly:parser-include-string parser
+    (format "\\include \"~a\"" (ly:get-option 'include-settings))))
+
 \maininput
 %% there is a problem at the end of the input file