Method code for $has_text.set_text()

[Turn off line numbering]

---

  1: arg txt;
  2: 
  3: // resets ,text to the list sent
  4: if (!.is_writable_by(sender()) && sender() != this())
  5:     throw(~perm, "Permission Denied.");
  6: if (.get_setting("plaintext", $has_text)) {
  7:     if (type(txt) == 'string)
  8:         text = [txt];
  9:     else
 10:         text = txt;
 11: } else {
 12:     text = $compiler.compile_cml(txt);
 13: }

---

// Created 27-Mar-1995 as a part of ColdCore, see: @help Credit