* Copyright (c) 1980 Regents of the University of California.
* %sccs.include.redist.c%
static char sccsid
[] = "@(#)v7.local.c 5.9 (Berkeley) %G%";
* Local routines that are installation dependent.
* Locate the user's mailbox file (ie, the place where new, unread
strcpy(copy(_PATH_MBOX
, buf
), user
);
* Get rid of the queued mail.
if (value("keep") != NOSTR
|| remove(mailname
) < 0)
close(creat(mailname
, 0600));
* Discover user login name.
if ((np
= getenv("USER")) != NOSTR
)
return getname(getuid());