Method code for $string.is_positive()

[Turn off line numbering]

---

  1: arg str;
  2: 
  3: if (match_regexp(str, "^(yes|y|true|t|all|everybody|anybody|everywhere|anywhere|1)$"))
  4:     return 1;
  5: return 0;

---

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