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 08:37:46 UTC
svn commit: r168089 -
/spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm
Author: quinlan
Date: Tue May 3 23:37:46 2005
New Revision: 168089
URL: http://svn.apache.org/viewcvs?rev=168089&view=rev
Log:
add underscore technology
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=168089&r1=168088&r2=168089&view=diff
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm Tue May 3 23:37:46 2005
@@ -1796,10 +1796,10 @@
# (?<![a-z\d][.-]) = don't let there be more hostname behind, but
# don't miss ".....www.bar.com" or "-----www.foo.com"
# (?<!.\@) = this will be caught by the email address regular expression
-my $schemelessRE = qr/(?<![a-z\d][.-])(?<!.\@)\b[a-z\d]
- [a-z\d.-]{0,251}
+my $schemelessRE = qr/(?<![a-z\d][._-])(?<!.\@)\b[a-z\d]
+ [a-z\d._-]{0,251}
\.${tldsRE}\.?\b
- (?![a-z\d.-])
+ (?![a-z\d._-])
/ix;
my $uriRe = qr/\b(?:$schemeRE:[$uricCheat]|$schemelessRE)[$uricSet#]*/o;