]> git.donarmstrong.com Git - lilypond.git/blobdiff - ly/toc-init.ly
Build: Clean up lilypond-book includes (issue 3559).
[lilypond.git] / ly / toc-init.ly
index f959e1679f443f90b763f905ab0ce31af2f8f394..32eeb462f8e77e0f3893058708334d68ddafc2b9 100644 (file)
@@ -1,4 +1,4 @@
-\version "2.15.17"
+\version "2.16.0"
 
 %% defined later, in a closure
 #(define-public (add-toc-item! markup-symbol text)
@@ -7,6 +7,7 @@
   #f)
 
 #(let ((toc-item-list (list)))
+   (call-after-session (lambda () (set! toc-item-list '())))
    (set! add-toc-item!
         (lambda (markup-symbol text)
           (let ((label (gensym "toc")))
@@ -24,7 +25,7 @@
 \paper {
   tocTitleMarkup = \markup \huge \column {
     \fill-line { \null "Table of Contents" \null }
-    \hspace #1
+    \null
   }
   tocItemMarkup = \markup \fill-line {
     \fromproperty #'toc:text \fromproperty #'toc:page