/[smeserver]/rpms/perl-Mail-DMARC/sme10/Mail-DMARC-1.20200214-handle_undef_domains.patch
ViewVC logotype

Contents of /rpms/perl-Mail-DMARC/sme10/Mail-DMARC-1.20200214-handle_undef_domains.patch

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.1 - (show annotations) (download)
Tue Apr 19 20:07:47 2022 UTC (2 years, 6 months ago) by jpp
Branch: MAIN
CVS Tags: perl-Mail-DMARC-1_20200214-2_el7_sme, perl-Mail-DMARC-1_20200214-1_el7_sme, HEAD
Mail-DMARC-1.20200214-handle_undef_domains.patch

1 diff -Nur --no-dereference Mail-DMARC-1.20200214.old/lib/Mail/DMARC/Base.pm Mail-DMARC-1.20200214/lib/Mail/DMARC/Base.pm
2 --- Mail-DMARC-1.20200214.old/lib/Mail/DMARC/Base.pm 2020-02-18 00:02:32.000000000 -0500
3 +++ Mail-DMARC-1.20200214/lib/Mail/DMARC/Base.pm 2022-04-19 15:52:12.805000000 -0400
4 @@ -265,6 +265,7 @@
5
6 sub is_valid_domain {
7 my ( $self, $domain ) = @_;
8 + return 0 unless $domain;
9 return 0 if $domain !~ /^$RE{net}{domain}{-rfc1101}{-nospace}$/x;
10 my $tld = ( split /\./, lc $domain )[-1];
11 return 1 if $self->is_public_suffix($tld);

admin@koozali.org
ViewVC Help
Powered by ViewVC 1.2.1 RSS 2.0 feed