- 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 == '\\')
+ return NOSTR;
+ if (*cp == '(') {
+ register int nesting = 0;
+
+ while (*cp != '\0') {
+ switch (*cp++) {
+ case '(':
+ nesting++;
+ break;
+ case ')':
+ --nesting;
+ break;
+ }
+ if (nesting <= 0)
+ break;
+ }
+ } else if (*cp == ' ' || *cp == '\t' || *cp == ',')