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 | d04f50310af5a829d7120e0d4dd3581669322e39 (patch) | |
| tree | 151c9e8cc5845d8083c68ab06ef42eeb3c2bd466 /lib-src/movemail.c | |
| parent | 845cde06cd0e21689c48f854a819e8a4de4e5f5a (diff) | |
| download | emacs-d04f50310af5a829d7120e0d4dd3581669322e39.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/movemail.c')
| -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) |