-# ifndef DELIVERMAIL
- stripfx(LOCNAM1, &name);
- stripfx(LOCNAM2, &name);
- stripfx(LOCNAM3, &name);
- stripfx(LOCNAM4, &name);
- if(*name == ':')name++; /* skip colon in to-name */
- for(p=name; *p!=':' && *p!='!' && *p!='^' &&*p!='\0'; p++);
- /* if(*p == ':') return(sendrmt(n, name, RMAIL)); */
- if (*p == ':')
- return(sendberkmail(n, name, fromaddr));
- else if (*p=='\0' && strcmp(name, "msgs") == 0)
- return(sendrmt(n, "-s", "/usr/ucb/msgs"));
-# endif