]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/clef.cc
* lily/include/lily-guile.hh: many new ly_ functions. Thanks to
[lilypond.git] / lily / clef.cc
index 73216528f0424e8e2cd636a4ec27c9bef541e615..70c7a2c5931e19f5776ef16e41c0872db17f9692 100644 (file)
@@ -23,7 +23,7 @@ Clef::before_line_breaking (SCM smob)
 
   SCM glyph = s->get_property ("glyph-name");
   
-  if (gh_string_p (glyph))
+  if (ly_string_p (glyph))
     {
       String str = ly_scm2string (glyph);
 
@@ -53,7 +53,7 @@ Clef::print (SCM smob)
 {
   Grob *me = unsmob_grob (smob);
   SCM glyph_scm = me->get_property ("glyph-name");
-  if (!gh_string_p (glyph_scm))
+  if (!ly_string_p (glyph_scm))
     return SCM_EOL;
 
   String glyph = String (ly_scm2string (glyph_scm));