]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/dynamic-engraver.cc
* lily/include/lily-guile.hh: is_x -> ly_c_X_p naming.
[lilypond.git] / lily / dynamic-engraver.cc
index f84551d88780454be1f5571f9165c453ffe02752..c58de021c1b5a964c638d9c5bc25fd8d41960429 100644 (file)
@@ -220,7 +220,7 @@ Dynamic_engraver::process_music ()
            start_type = "crescendo";
          
          SCM s = get_property ((start_type + "Spanner").to_str0 ());
-         if (!is_symbol (s) || s == ly_symbol2scm ("hairpin"))
+         if (!ly_c_symbol_p (s) || s == ly_symbol2scm ("hairpin"))
            {
              cresc_  = make_spanner ("Hairpin");
              cresc_->set_property ("grow-direction",