You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@spamassassin.apache.org by he...@apache.org on 2019/08/13 13:53:12 UTC
svn commit: r1865043 - in /spamassassin:
branches/3.4/lib/Mail/SpamAssassin/PerMsgStatus.pm
trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm
Author: hege
Date: Tue Aug 13 13:53:12 2019
New Revision: 1865043
URL: http://svn.apache.org/viewvc?rev=1865043&view=rev
Log:
Strip common schemeless skype: email: prefixes from mails
Modified:
spamassassin/branches/3.4/lib/Mail/SpamAssassin/PerMsgStatus.pm
spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm
Modified: spamassassin/branches/3.4/lib/Mail/SpamAssassin/PerMsgStatus.pm
URL: http://svn.apache.org/viewvc/spamassassin/branches/3.4/lib/Mail/SpamAssassin/PerMsgStatus.pm?rev=1865043&r1=1865042&r2=1865043&view=diff
==============================================================================
--- spamassassin/branches/3.4/lib/Mail/SpamAssassin/PerMsgStatus.pm (original)
+++ spamassassin/branches/3.4/lib/Mail/SpamAssassin/PerMsgStatus.pm Tue Aug 13 13:53:12 2019
@@ -2443,6 +2443,7 @@ sub _get_parsed_uri_list {
# And this is linkified: foo@bar%2Ecom?foo.com&bar (woot??)
# And this is linkified with Outlook: foo@bar%2Ecom&foo (woot??)
# Don't test when ? or & exists, canonicalizing will handle later.
+ $uri =~ s/^(?:skype|e?-?mail)?:+//ig; # strip common misparses
if ($uri !~ tr/?&// && $uri =~ /\@(.*)/) {
next unless $self->{main}->{registryboundaries}->is_domain_valid($1);
}
Modified: spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm
URL: http://svn.apache.org/viewvc/spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm?rev=1865043&r1=1865042&r2=1865043&view=diff
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm Tue Aug 13 13:53:12 2019
@@ -2469,6 +2469,7 @@ sub _process_text_uri_list {
# And this is linkified: foo@bar%2Ecom?foo.com&bar (woot??)
# And this is linkified with Outlook: foo@bar%2Ecom&foo (woot??)
# Don't test when ? or & exists, canonicalizing will handle later.
+ $uri =~ s/^(?:skype|e?-?mail)?:+//ig; # strip common misparses
if ($uri !~ tr/?&// && $uri =~ /\@(.*)/) {
next unless $self->{main}->{registryboundaries}->is_domain_valid($1);
}