- Group_interface::add_thing (span_arpeggio_, "stems", ly_car (s));
- for (SCM s = arpeggios_[i]->get_grob_property ("side-support-elements");
+ Group_interface::add_thing (span_arpeggio_, ly_symbol2scm ("stems"), ly_car (s));
+ for (SCM s = arpeggios_[i]->get_property ("side-support-elements");