]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/sustain-pedal.cc
* SConstruct: Further development.
[lilypond.git] / lily / sustain-pedal.cc
index c2cad1be294fdb8d507960a84f2444addf925f1c..f57ba09a9eb8568bbcc48898a7805cb448d2a11b 100644 (file)
@@ -41,8 +41,8 @@ Sustain_pedal::print (SCM smob)
   Grob * e = unsmob_grob (smob);
   
   Stencil mol;
-  SCM glyph = e->get_grob_property ("text");
-  if (!gh_string_p (glyph))
+  SCM glyph = e->get_property ("text");
+  if (!ly_c_string_p (glyph))
     return mol.smobbed_copy ();
   
   String text = ly_scm2string (glyph);