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

[lilypond.git] / lily / dynamic-performer.cc

diff --git a/lily/dynamic-performer.cc b/lily/dynamic-performer.cc
index 257708de292fabf63f9b4b7b9eb8a16a5f1b56fb..e8e2bab12a527904d7e2294cac093b969ffb6937 100644 (file)
--- a/lily/dynamic-performer.cc
+++ b/lily/dynamic-performer.cc
@@ -75,10 +75,10 @@ Dynamic_performer::create_audio_elements ()
          */
          SCM s = get_property ("midiInstrument");
          
-         if (!ly_c_string_p (s))
+         if (!scm_is_string (s))
            s = get_property ("instrument");
          
-         if (!ly_c_string_p (s))
+         if (!scm_is_string (s))
            s = scm_makfrom0str ("piano");