+ String str = ly_scm2string (glyph);
+
+ if (to_boolean (s->get_grob_property ("non-default"))
+ && s->break_status_dir () != RIGHT
+ && !to_boolean (s->get_grob_property ("full-size-change")))
+ {
+ str += "_change";
+ s->set_grob_property ("glyph-name", ly_str02scm (str.ch_C ()));
+ }
+ }
+ else
+ {
+ s->suicide ();
+ return SCM_UNSPECIFIED;