mail/p5-Mail-Mbox-MessageParser/patches/patch-ac

   1 $NetBSD: patch-ac,v 1.1 2009/04/02 18:10:39 tez Exp $
   2
   3 diff -ruN lib/Mail/Mbox/MessageParser/Perl.pm.orig lib/Mail/Mbox/MessageParser/Perl.pm > ../../patches/patch-ac
   4
   5 --- lib/Mail/Mbox/MessageParser/Perl.pm.orig    2009-03-31 16:21:44.338876800 -0500
   6 +++ lib/Mail/Mbox/MessageParser/Perl.pm 2009-03-31 16:23:32.285106100 -0500
   7 @@ -265,7 +265,7 @@
   8    # RFC 1521 says the boundary can be no longer than 70 characters. Back up a
   9    # little more than that.
  10    my $endline = $self->{'endline'};
  11 -  $self->_read_until_match(qr/^--\Q$boundary\E--$endline/,76)
  12 +  $self->_read_until_match(qr/^--\Q$boundary\E--$endline/m,76)
  13      or return 0;
  14
  15    return 1;