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 2021/05/10 04:41:31 UTC
svn commit: r1889714 -
/spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/HashBL.pm
Author: hege
Date: Mon May 10 04:41:31 2021
New Revision: 1889714
URL: http://svn.apache.org/viewvc?rev=1889714&view=rev
Log:
Hashing functions expect bytes
Modified:
spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/HashBL.pm
Modified: spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/HashBL.pm
URL: http://svn.apache.org/viewvc/spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/HashBL.pm?rev=1889714&r1=1889713&r2=1889714&view=diff
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/HashBL.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/HashBL.pm Mon May 10 04:41:31 2021
@@ -620,8 +620,10 @@ sub _hash {
my $hashtype = $opts =~ /\b(raw|sha1|md5)\b/i ? lc($1) : 'sha1';
if ($hashtype eq 'sha1') {
+ utf8::encode($value) if utf8::is_utf8($value); # sha1_hex expects bytes
return sha1_hex($value);
} elsif ($hashtype eq 'md5') {
+ utf8::encode($value) if utf8::is_utf8($value); # md5_hex expects bytes
return md5_hex($value);
} else {
return $value;