Item *text = make_item ("TextScript", r->self_scm ());
int priority = robust_scm2int (text->get_property ("script-priority"),
Item *text = make_item ("TextScript", r->self_scm ());
int priority = robust_scm2int (text->get_property ("script-priority"),