home *** CD-ROM | disk | FTP | other *** search
- .key name/a
- .bra {
- .ket }
-
- if exists UUMAIL:{name}
- echo "WARNING! A user {name} already has a mailbox!"
- quit 20
- endif
-
- makedir ListSERV:groups/{name}
- echo >>ListSERV:Index "{name}"
- echo >>UULIB:Aliases "{name}:: *"|ListSERV:s/SendMailingList {name}*""
- echo >>UULIB:Aliases "{name}-error:: listserv-manager"
- echo >>UULIB:Aliases "{name}-admin:: listserv-manager"
- echo >>UULIB:Aliases "{name}-request:: listserv"
- DME ListSERV:groups/{name}/List
- DME ListSERV:groups/{name}/Description
-