Method code for $group.name()

[Turn off line numbering]

---

  1: arg @args;
  2: var n, x;
  3: 
  4: n = tostr(.objname());
  5: if ((x = stridx(n, "_group", -1)) > 1)
  6:     return substr(n, 1, x - 1);
  7: return n;

---

// Created 01-Sep-1998 as a part of ColdCore, see: @help Credit

Method Ancestry Override:

 ----   38 $group.name(@args)
 ----    6 $root.name(@args)