diff options
| author | Paul Eggert <eggert@twinsun.com> | 1997-12-03 07:11:43 +0000 |
|---|---|---|
| committer | Paul Eggert <eggert@twinsun.com> | 1997-12-03 07:11:43 +0000 |
| commit | 27d19d706a9ef66dcb306d2b8bf964745bf7a5c3 (patch) | |
| tree | 24db5fd64242ebe442bda325196d58a9a377d9a6 /lib-src | |
| parent | 9547eda2763877165ab9880d6d3b37f45fd38f1f (diff) | |
| download | emacs-27d19d706a9ef66dcb306d2b8bf964745bf7a5c3.tar.gz | |
(mbx_write) [MAIL_USE_POP]: Disable the code which quotes with a
'>' any lines starting with "From " read from the POP server, but
leave the code in place, wrapped in #ifdef
MOVEMAIL_QUOTE_POP_FROM_LINES, in case we have to restore it later
because it turns out that something is depending on it. Change
suggested by Paul Eggert <eggert@twinsun.com>.
Convert the character \037 (^_) at the beginning of a line into
the character '^' followed by the character '_', because otherwise
Emacs can't parse the resulting file as a valid BABYL file.
Change suggested by Paul Eggert <eggert@twinsun.com>.
Diffstat (limited to 'lib-src')
| -rw-r--r-- | lib-src/movemail.c | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/lib-src/movemail.c b/lib-src/movemail.c index 866f0b08139..b7b51d35061 100644 --- a/lib-src/movemail.c +++ b/lib-src/movemail.c @@ -830,11 +830,20 @@ mbx_write (line, mbf) char *line; FILE *mbf; { +#ifdef MOVEMAIL_QUOTE_POP_FROM_LINES if (IS_FROM_LINE (line)) { if (fputc ('>', mbf) == EOF) return (NOTOK); } +#endif + if (line[0] == '\037') + { + if (fputs ("^_", mbf) == EOF) + return (NOTOK); + line++; + len--; + } if (fputs (line, mbf) == EOF) return (NOTOK); if (fputc (0x0a, mbf) == EOF) |