- string suffix = to_string (min (robust_scm2int (me->get_property ("duration-log"), 2), 2));
- if (style != ly_symbol2scm ("default"))
- {
- SCM gn = me->get_property ("glyph-name");
- if (scm_is_string (gn))
- suffix = ly_scm2string (gn);
- }
+ string suffix = ::to_string (min (robust_scm2int (me->get_property ("duration-log"), 2), 2));
+ if (style != "default")
+ suffix = robust_scm2string (me->get_property ("glyph-name"), "");