From c1523c3594d2e494e43afb5bb7382dd14c2b9933 Mon Sep 17 00:00:00 2001 From: Jun Kuriyama Date: Thu, 6 Jun 2002 01:52:19 +0000 Subject: Apply a patch to fix some problems reported on bugtraq. White space nits in original patch are ignored. References: http://online.securityfocus.com/archive/1/275282/2002-06-01/2002-06-07/0 Obtained from: http://www.roaringpenguin.com/mimedefang/mime-tools-patch.txt Reported by: "Mike Jakubik" --- mail/p5-MIME-Tools/files/patch-Words.pm | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100644 mail/p5-MIME-Tools/files/patch-Words.pm (limited to 'mail/p5-MIME-Tools/files/patch-Words.pm') diff --git a/mail/p5-MIME-Tools/files/patch-Words.pm b/mail/p5-MIME-Tools/files/patch-Words.pm new file mode 100644 index 000000000000..d1fb41ea9759 --- /dev/null +++ b/mail/p5-MIME-Tools/files/patch-Words.pm @@ -0,0 +1,11 @@ +--- lib/MIME/Words.pm.orig Sat Nov 11 01:45:12 2000 ++++ lib/MIME/Words.pm Thu Jun 6 10:15:15 2002 +@@ -186,7 +186,7 @@ + $@ = ''; ### error-return + + ### Collapse boundaries between adjacent encoded words: +- $encstr =~ s{(\?\=)\r?\n[ \t](\=\?)}{$1$2}gs; ++ $encstr =~ s{(\?\=)\s*(\=\?)}{$1$2}gs; + pos($encstr) = 0; + ### print STDOUT "ENC = [", $encstr, "]\n"; + -- cgit v1.2.3