- r->add_property (X_("type"), "track");
- r->add_property (X_("route-id"), atoi (atv->parent_route()->id ().to_s ().c_str()));
- r->add_property (X_("automation-list-id"), atoi ((*i)->line().the_list()->id ().to_s ().c_str()));
- r->add_property (X_("parameter"), EventTypeMap::instance().to_symbol ((*i)->line().the_list()->parameter ()));
-
- snprintf(buf, sizeof(buf), "%d", (*i)->view_index());
- r->add_property (X_("view-index"), string(buf));
+ r->set_property (X_("type"), "track");
+ r->set_property (X_("route-id"), atv->parent_route()->id ());
+ r->set_property (X_("automation-list-id"), (*i)->line().the_list()->id ());
+ r->set_property (X_("parameter"), EventTypeMap::instance().to_symbol ((*i)->line().the_list()->parameter ()));
+ r->set_property (X_("view-index"), (*i)->view_index());