+ SCM name_entry = ly_cdr (s);
+
+ SCM str = (ly_c_pair_p (name_entry)) ? index_get_cell (name_entry, d) : name_entry;
+ return Font_interface::get_default_font (me)->find_by_name ("scripts-" +
+ ly_scm2string (str));
+ }
+ else if (key == ly_symbol2scm ("accordion"))
+ {
+ return Lookup::accordion (ly_cdr (s), 1.0, Font_interface::get_default_font (me));