X-Git-Url: https://git.donarmstrong.com/?p=lilypond.git;a=blobdiff_plain;f=ly%2Ftoc-init.ly;h=ad7c64b72c5e421876ed74796e6a9ca37ba57921;hp=c3fd5ab57d0ab3c236728d03350c65035e316bd3;hb=2c894ac3f60274f9fdd0bf2593cfb856c5c7b13f;hpb=c33c066fd6cc7f1d7f513e76c12e3688a4276059

diff --git a/ly/toc-init.ly b/ly/toc-init.ly
index c3fd5ab57d..ad7c64b72c 100644
--- a/ly/toc-init.ly
+++ b/ly/toc-init.ly
@@ -36,13 +36,14 @@ tocItemWithDotsMarkup = \markup \fill-with-pattern #1 #RIGHT .
   \fromproperty #'toc:text \fromproperty #'toc:page
 
 #(define-markup-list-command (table-of-contents layout props) ()
+  #:properties ((baseline-skip))
   ( _i "Outputs the table of contents, using the paper variable
 @code{tocTitleMarkup} for its title, then the list of lines
 built using the @code{tocItem} music function
 Usage: @code{\\markuplist \\table-of-contents}" )
   (cons (interpret-markup layout props
                           (ly:output-def-lookup layout 'tocTitleMarkup))
-        (space-lines (chain-assoc-get 'baseline-skip props)
+        (space-lines baseline-skip
                     (map (lambda (toc-item)
                            (let ((label (car toc-item))
                                  (toc-markup (cadr toc-item))