]> git.donarmstrong.com Git - lilypond.git/commitdiff
Use ly:staff-symbol-staff-space.
authorNeil Puttock <n.puttock@gmail.com>
Wed, 19 Aug 2009 19:42:52 +0000 (20:42 +0100)
committerNeil Puttock <n.puttock@gmail.com>
Wed, 19 Aug 2009 19:42:52 +0000 (20:42 +0100)
scm/tablature.scm

index e44b95b43f97f7c3a41b1e27adb8f1ddc3712751..d28f2fc4831c84048de4771db531d07d838e1532 100644 (file)
@@ -80,7 +80,7 @@
         ;; if it is "moderntab", we'll draw it
         (let* ((staff-symbol (ly:grob-object grob 'staff-symbol))
                (line-count (ly:grob-property staff-symbol 'line-count))
-               (staff-space (ly:grob-property staff-symbol 'staff-space 1)))
+               (staff-space (ly:staff-symbol-staff-space grob)))
 
           (grob-interpret-markup grob (make-customTabClef-markup line-count
                                                                  staff-space)))