Method code for $ctext_frob.set_vars()

[Turn on line numbering]

---

arg this, new;
var vars, key;

return (<this(), [this[1], dict_union(this[2], new)]>);
vars = this[2];
for key in (new.keys())
    vars = dict_add(vars, key, new[key]);
return (<this(), [this[1], vars]>);

---

// Created 17-Jul-1996 as a part of ColdCore, see: @help Credit