Method code for $group.name()

[Turn on line numbering]

---

arg @args;
var n, x;

n = tostr(.objname());
if ((x = stridx(n, "_group", -1)) > 1)
    return substr(n, 1, x - 1);
return n;

// $#Edited: 19 Sep 01 11:31 $brandon

---

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

Method Ancestry Override:

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