View/Edit #119:old_all_newsgroups

Name(s): old_all_newsgroups

1: nums = names = {}
2: for x in ($mail_agent.contents)
3:   if (x:isa($newsgroup))
4:     nums = {@nums, x}
5:     names = {@names, this:newsgroup_name(x)}
6:   endif
7: endfor
8: return {nums, names}
9: "Last modified by Dax (#789) on Tue Feb 10 12:47:52 1998 EST."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: Dizzy_Devil (#9682)

You are not logged in.