* lily/ledger-line-spanner.cc (print): swap linear_combination

[lilypond.git] / lily / clef.cc

diff --git a/lily/clef.cc b/lily/clef.cc
index 70c7a2c5931e19f5776ef16e41c0872db17f9692..c7e4920a99ee0549b6b0a65e6398c25c6cd136ff 100644 (file)
--- a/lily/clef.cc
+++ b/lily/clef.cc
@@ -23,7 +23,7 @@ Clef::before_line_breaking (SCM smob)
 
   SCM glyph = s->get_property ("glyph-name");
   
-  if (ly_string_p (glyph))
+  if (scm_is_string (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 (!ly_string_p (glyph_scm))
+  if (!scm_is_string (glyph_scm))
     return SCM_EOL;
 
   String glyph = String (ly_scm2string (glyph_scm));