-void
-Script::do_substitute_dependency(Score_elem*o,Score_elem*n)
-{
- Staff_side::do_substitute_dependency(o,n);
- if (o == stem_l_) {
- stem_l_ = n ? (Stem*)n->item() : 0;
+ SCM key = ly_car (s);
+ if (key == ly_symbol2scm ("feta"))
+ {
+ return Font_interface::get_default_font (me)->find_by_name ("scripts-" +
+ ly_scm2string (index_get_cell (ly_cdr (s), d)));
+ }
+ else if (key == ly_symbol2scm ("accordion"))
+ {
+ return Lookup::accordion (ly_cdr (s), 1.0, Font_interface::get_default_font (me));