** After mhl was made a built-in in msh, m_getfld() worked just fine
** (using m_unknown() at startup). Until one day: a message which was
** the result of a bursting was shown. Then, since the burst boundaries
** After mhl was made a built-in in msh, m_getfld() worked just fine
** (using m_unknown() at startup). Until one day: a message which was
** the result of a bursting was shown. Then, since the burst boundaries
** the code gets executed is when inc (or msh) calls it, and both of these
** have already called mts_init().
**
** the code gets executed is when inc (or msh) calls it, and both of these
** have already called mts_init().
**
** ------------------------
** (Written by Van Jacobson for the mh6 m_getfld, January, 1986):
**
** ------------------------
** (Written by Van Jacobson for the mh6 m_getfld, January, 1986):
**
**
** If the first line of the maildrop is a Unix "From " line, we
** say the style is MBOX and eat the rest of the line. Otherwise
**
** If the first line of the maildrop is a Unix "From " line, we
** say the style is MBOX and eat the rest of the line. Otherwise
*/
msg_style = MS_UNKNOWN;
pos = ftell(iob);
if (fread(text, sizeof(*text), 5, iob) == 5
*/
msg_style = MS_UNKNOWN;
pos = ftell(iob);
if (fread(text, sizeof(*text), 5, iob) == 5
- fseek(iob, pos, SEEK_SET);
- if (mmdlm2 == NULL || *mmdlm2 == 0)
- mmdlm2 = "\001\001\001\001\n";
- delimstr = mmdlm2;
- msg_style = MS_MMDF;
+ adios(NULL, "No Unix style (mbox) maildrop.");
for (cp = (char *) fdelim + 1; cp < (char *) delimend; cp++ )
pat_map[(unsigned char)*cp] = (unsigned char *) cp;
for (cp = (char *) fdelim + 1; cp < (char *) delimend; cp++ )
pat_map[(unsigned char)*cp] = (unsigned char *) cp;