Mailing List Archive

Author: quinlan
Date: Tue May 3 19:32:14 2005
New Revision: 168051

URL: http://svn.apache.org/viewcvs?rev=168051&view=rev
Log:
add /i just in case and /o just because

Modified:
spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm

Modified: spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm
URL: http://svn.apache.org/viewcvs/spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm?rev=168051&r1=168050&r2=168051&view=diff
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm Tue May 3 19:32:14 2005
@@ -1935,11 +1935,11 @@
#warn("uri: got URI: $uri\n");
push @uris, $uri;
}
- while (/($Addr_spec_re)/go) {
+ while (/($Addr_spec_re)/igo) {
my $uri = $1;

# skip mismatches from email address regular expression
- next unless $uri =~ /\.${tldsRE}\W*$/; # skip non-TLDs
+ next unless $uri =~ /\.${tldsRE}\W*$/io; # skip non-TLDs

$uri =~ s/\s*\@\s*/@/; # remove spaces around the '@'
$uri = "mailto:$uri"; # prepend mailto: