Mercurial > emacs
comparison lib-src/movemail.c @ 101915:091a8cf73243
(mbx_delimit_begin, mbx_delimit_end): Write mbox rather than Babyl
format. (Bug#2196)
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Tue, 10 Feb 2009 03:30:39 +0000 |
parents | a9f7e446141d |
children | 696b3e7c297b |
comparison
equal
deleted
inserted
replaced
101914:fc3f7f3a49fc | 101915:091a8cf73243 |
---|---|
921 | 921 |
922 int | 922 int |
923 mbx_delimit_begin (mbf) | 923 mbx_delimit_begin (mbf) |
924 FILE *mbf; | 924 FILE *mbf; |
925 { | 925 { |
926 if (fputs ("\f\n0, unseen,,\n", mbf) == EOF) | 926 if (fputs ("From movemail\n", mbf) == EOF) |
927 return (NOTOK); | 927 return (NOTOK); |
928 return (OK); | 928 return (OK); |
929 } | 929 } |
930 | 930 |
931 int | 931 int |
932 mbx_delimit_end (mbf) | 932 mbx_delimit_end (mbf) |
933 FILE *mbf; | 933 FILE *mbf; |
934 { | 934 { |
935 if (putc ('\037', mbf) == EOF) | 935 if (putc ('\n', mbf) == EOF) |
936 return (NOTOK); | 936 return (NOTOK); |
937 return (OK); | 937 return (OK); |
938 } | 938 } |
939 | 939 |
940 #endif /* MAIL_USE_POP */ | 940 #endif /* MAIL_USE_POP */ |