You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@spamassassin.apache.org by qu...@apache.org on 2005/05/04 04:32:14 UTC
svn commit: r168051 -
/spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm
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: