- }
- if (*cp == '\0')
- return(NOSTR);
- } while (any(*cp, " \t,("));
- for (cp2 = wbuf; *cp && !any(*cp, " \t,("); *cp2++ = *cp++)
- ;
- *cp2 = '\0';
- return(cp);
-}
-
-/*
- * Verify that all the users in the list of names are
- * legitimate. Bitch about and delink those who aren't.
- */
-
-struct name *
-verify(names)
- struct name *names;
-{
- register struct name *np, *top, *t, *x;
- register char *cp;
-
-#ifdef SENDMAIL
- return(names);
-#else
- top = names;
- np = names;
- while (np != NIL) {
- if (np->n_type & GDEL) {
- np = np->n_flink;
- continue;
- }
- for (cp = "!:@^"; *cp; cp++)
- if (any(*cp, np->n_name))
- break;
- if (*cp != 0) {
- np = np->n_flink;
- continue;
- }
- cp = np->n_name;
- while (*cp == '\\')