From 2ce5dc7d37a6437476d43a1d7b9f2b326ef71610 Mon Sep 17 00:00:00 2001 From: pp Date: Thu, 8 Feb 2007 04:08:56 +0000 Subject: - bugfix: "From" escaping regexp was not global git-svn-id: https://siedziba.pl:790/svn/repos/dbxrecover@271 455248ca-bdda-0310-9134-f4ebb693071a --- dbxrecover-2p | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'dbxrecover-2p') diff --git a/dbxrecover-2p b/dbxrecover-2p index 6d2f71c..fb00700 100755 --- a/dbxrecover-2p +++ b/dbxrecover-2p @@ -318,7 +318,7 @@ use warnings; for(@{$chains}) { my $message = $_->data; - $message =~ s/^>*From />$&/m; # mbox "From " escaping + $message =~ s/^>*From />$&/mg; # mbox "From " escaping # we don't have the original envelope address, so just output a fake one print "From unknown\@unknown.invalid Mon Jan 1 00:00:00 1970\r\n"; print $message; -- cgit v1.2.3