* lily/include/lily-guile.hh: compatibility glue for 1.6

[lilypond.git] / lily / drum-note-engraver.cc

diff --git a/lily/drum-note-engraver.cc b/lily/drum-note-engraver.cc
index e26cdceebff0240656db94dca136a195c8424d4f..884f6c4de6ba648dd44dd2acd3be6944b941d9f3 100644 (file)
--- a/lily/drum-note-engraver.cc
+++ b/lily/drum-note-engraver.cc
@@ -101,7 +101,7 @@ Drum_notes_engraver::process_music ()
          if (ly_c_symbol_p (style))
            note->set_property ("style", style);
 
-         if (ly_c_string_p (script))
+         if (scm_is_string (script))
            {
              Item *p  = make_item ("Script", ev->self_scm ());
              bool follow;