Method code for $has_text.del_text()

[Turn off line numbering]

---

  1: // deletes all text
  2: if (!.is_writable_by(sender()) && sender() != this())
  3:     throw(~perm, "Permission Denied.");
  4: text = [];

---

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