+ {
+ e->internal_set_grob_property (elt_prop_sym, val);
+
+ SCM meta = e->get_grob_property ("meta");
+ SCM name = scm_assoc (ly_symbol2scm ("name"), meta);
+ warning (_f ("`%s' is deprecated. Use\n \\property %s.%s \\override #'%s = #%s",
+ ly_symbol2string (prop_sym).ch_C (),
+ origin->type_str_.ch_C (),
+ ly_scm2string (ly_cdr (name)).ch_C (),
+ ly_symbol2string (elt_prop_sym).ch_C (),
+ ly_scm2string (ly_write2scm (val)).ch_C ()));
+ }