Method code for $ctext_frob.set_vars()

[Turn off line numbering]

---

  1: arg this, new;
  2: var vars, key;
  3: 
  4: return (<this(), [this[1], dict_union(this[2], new)]>);
  5: vars = this[2];
  6: for key in (new.keys())
  7:     vars = dict_add(vars, key, new[key]);
  8: return (<this(), [this[1], vars]>);

---

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