Method code for $gender.set_pronouns()

[Turn on line numbering]

---

arg nmbr, ps, po, pp, pq, pr, psc, poc, ppc, pqc, prc;
var x;

.perms(sender(), 'manager);
pronouns = #[['pr, pr], ['pp, pp], ['po, po], ['ps, ps], ['pq, pq], ['prc, prc], ['ppc, ppc], ['poc, poc], ['psc, psc], ['pqc, pqc]];
number = nmbr;
context = [ps, po, pp, pq, pr, psc, poc, ppc, pqc, prc];

---

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