You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@spamassassin.apache.org by do...@apache.org on 2005/05/26 05:53:49 UTC
svn commit: r178573 -
/spamassassin/trunk/lib/Mail/SpamAssassin/Conf/Parser.pm
Author: dos
Date: Wed May 25 20:53:47 2005
New Revision: 178573
URL: http://svn.apache.org/viewcvs?rev=178573&view=rev
Log:
bug 4347: fix set_addr_list() validation -- now only checks for non-blank string
Modified:
spamassassin/trunk/lib/Mail/SpamAssassin/Conf/Parser.pm
Modified: spamassassin/trunk/lib/Mail/SpamAssassin/Conf/Parser.pm
URL: http://svn.apache.org/viewcvs/spamassassin/trunk/lib/Mail/SpamAssassin/Conf/Parser.pm?rev=178573&r1=178572&r2=178573&view=diff
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/Conf/Parser.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/Conf/Parser.pm Wed May 25 20:53:47 2005
@@ -620,7 +620,7 @@
sub set_addrlist_value {
my ($conf, $key, $value, $line) = @_;
- unless (defined $value && $value =~ /^(?:\S+\@\S+(?:\s+\S+\@\S+)*)$/) {
+ unless (defined $value && $value !~ /^$/) {
return $Mail::SpamAssassin::Conf::MISSING_REQUIRED_VALUE;
}
$conf->{parser}->add_to_addrlist ($key, split (' ', $value));
@@ -629,7 +629,7 @@
sub remove_addrlist_value {
my ($conf, $key, $value, $line) = @_;
- unless (defined $value && $value =~ /^(?:\S+\@\S+(?:\s+\S+\@\S+)*)$/) {
+ unless (defined $value && $value !~ /^$/) {
return $Mail::SpamAssassin::Conf::MISSING_REQUIRED_VALUE;
}
$conf->{parser}->remove_from_addrlist ($key, split (' ', $value));