diff --git a/lib/chibi/mime.scm b/lib/chibi/mime.scm
index 1ed5a7e6..99c865d6 100644
--- a/lib/chibi/mime.scm
+++ b/lib/chibi/mime.scm
@@ -232,6 +232,9 @@
                      res)))
               ((eqv? ch 10)
                (get-output-bytevector out))
+              ((and (eqv? ch 13) (eqv? (peek-u8 in) 10))
+               (read-u8 in)
+               (get-output-bytevector out))
               (else
                (write-u8 ch out)
                (lp)))))))