Message-ID: <1419264733.22778.8.camel@df1844j>
Subject: Re: [alpine-devel] SpamAssassin DNSBL tests fail after changes in
 perl (patch included)
From: Leonardo Arena <rnalrd@gmail.com>
To: Johan Dahlberg <johan@dnix.se>
Cc: alpine-devel@lists.alpinelinux.org
Date: Mon, 22 Dec 2014 17:12:13 +0100
In-Reply-To: <20141217094939.GA7838@einstein.local>
References: <20141217094939.GA7838@einstein.local>
Content-Type: multipart/signed; micalg="pgp-sha1"; protocol="application/pgp-signature";
	boundary="=-bq/grFoadktL/Y+pQbYx"
Precedence: list
Mime-Version: 1.0


--=-bq/grFoadktL/Y+pQbYx
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable

On mer, 2014-12-17 at 11:49 +0200, Johan Dahlberg wrote:
> --- SpamAssassin/DnsResolver.pm.bak
> +++ SpamAssassin/DnsResolver.pm
> @@ -204,8 +204,10 @@
>      @ns_addr_port =3D @{$self->{conf}->{dns_servers}};
>      dbg("dns: servers set by config to: %s", join(',
> ',@ns_addr_port));
>    } elsif ($res) {  # default as provided by Net::DNS, e.g.
> /etc/resolv.conf
> -    @ns_addr_port =3D map(untaint_var("[$_]:" . $res->{port}),
> -                        @{$res->{nameservers}});
> +    my @ns =3D $res->UNIVERSAL::can('nameservers') ? $res->nameservers
> +                                                 :
> @{$res->{nameservers}};
> +    my $port =3D $res->UNIVERSAL::can('port') ? $res->port :
> $res->{port};
> +    @ns_addr_port =3D map(untaint_var("[$_]:" . $port), @ns);
>      dbg("dns: servers obtained from Net::DNS : %s", join(',
> ',@ns_addr_port));
>    }
>    return @ns_addr_port;


Hi,
thanks for your contribution.
Would it be possible to have a GIT patch? It would be easier and 100%
error-free to apply.
Thanks!

R,
leo

--=-bq/grFoadktL/Y+pQbYx
Content-Type: application/pgp-signature; name="signature.asc"
Content-Description: This is a digitally signed message part
Content-Transfer-Encoding: 7bit

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1

iQEcBAABAgAGBQJUmELdAAoJELAPckZGG2T6NLwH/3KhhYd3hVUSB62YCMjUUuQG
EbLLumLdeWi3u3qgefzdiOeTjy5g/pt4Gxcd125wAJDgxxbAZfoenVl23l0WUry1
m/v77dckva2lkLHI/AGJ/e5/pjt7Qr4sc4eaFv2bA6YlEpBzJ2uLjXIKIOGqf1h7
1aTvVirLSaKaYpy/CF3wxY4BQavVkS/GAq1T0CZtlXTYqlmnsWdKs+b6jF6aK72x
AaKtkTLYefYfp2vHLR8SBv7BXFI0Wr9Y58JB7tnHT0tfrctENayoLreMSwVsUSHO
cmgEmvtaKyAP9FsW7d2d7pR759TTHxMAzvhbL486o4XHH6SfuC0CiiUDrenSE0A=
=40dh
-----END PGP SIGNATURE-----

--=-bq/grFoadktL/Y+pQbYx--



---
Unsubscribe:  alpine-devel+unsubscribe@lists.alpinelinux.org
Help:         alpine-devel+help@lists.alpinelinux.org
---