From 6b61628b5e49f09a16301b9821c4ec8adf9362aa Mon Sep 17 00:00:00 2001
From: Neil Puttock <n.puttock@gmail.com>
Date: Wed, 19 Aug 2009 20:42:52 +0100
Subject: [PATCH] Use ly:staff-symbol-staff-space.

---
 scm/tablature.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scm/tablature.scm b/scm/tablature.scm
index e44b95b43f..d28f2fc483 100644
--- a/scm/tablature.scm
+++ b/scm/tablature.scm
@@ -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)))
-- 
2.39.2