- Score_element::ly_set_elt_property (inf.elem_l_->self_scm_,
- gh_cadr (o->pred_sym_val_list_),
- gh_caddr (o->pred_sym_val_list_));
+ SCM sym = o->get_mus_property ("grob-property");
+ SCM val = o->get_mus_property ("grob-value");
+ inf.elem_l_->set_grob_property (sym, val);