diff --git a/lib/Email/Sender/Transport/Mbox.pm b/lib/Email/Sender/Transport/Mbox.pm index b8f648d..b2017bb 100644 --- a/lib/Email/Sender/Transport/Mbox.pm +++ b/lib/Email/Sender/Transport/Mbox.pm @@ -64,6 +64,8 @@ sub _open_fh { my $fh = IO::File->new($file, '>>') or Carp::confess "couldn't open $file for appending: $!"; + $fh->binmode(':raw'); + $class->_getlock($fh, $file); $fh->seek(0, 2);