-#ifdef BPOP
- if (pmsh && is_virtual (mp, msgnum)) {
- if (Msgs[msgnum].m_top == 0)
- padios (NULL, "msh_ready (%d, %d) botch", msgnum, full);
- if (!full) {
- strncpy (tmpfil, m_tmpfil (invo_name), sizeof(tmpfil));
- if ((yp = fopen (tmpfil, "w+")) == NULL)
- padios (tmpfil, "unable to create");
- unlink (tmpfil);
-
- if (pop_top (Msgs[msgnum].m_top, 4, pop_action) == NOTOK)
- padios (NULL, "%s", response);
-
- m_eomsbr ((int (*)()) 0); /* XXX */
- msg_style = MS_DEFAULT; /* .. */
- fseek (yp, 0L, SEEK_SET);
- return yp;
- }
-
- fseek (fp, 0L, SEEK_END);
- fwrite (mmdlm1, 1, strlen (mmdlm1), fp);
- if (fflush (fp))
- padios ("temporary file", "write error on");
- fseek (fp, 0L, SEEK_END);
- pos1 = ftell (fp);
-
- yp = fp;
- if (pop_retr (Msgs[msgnum].m_top, pop_action) == NOTOK)
- padios (NULL, "%s", response);
- yp = NULL;
-
- fseek (fp, 0L, SEEK_END);
- pos2 = ftell (fp);
- fwrite (mmdlm2, 1, strlen (mmdlm2), fp);
- if (fflush (fp))
- padios ("temporary file", "write error on");
-
- Msgs[msgnum].m_start = pos1;
- Msgs[msgnum].m_stop = pos2;
-
- unset_virtual (mp, msgnum);
- }
-#endif /* BPOP */
-