From 6b53599f00c5f0b0a9b8722f71ade90413bc204e Mon Sep 17 00:00:00 2001 From: "[Thomas Green]" Date: Tue, 29 Aug 2023 15:18:42 +0200 Subject: [PATCH] Fix Basic01 Makes use of the correct variables (fixes #1280) --- lib/Zonemaster/Engine/Test/Basic.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/Zonemaster/Engine/Test/Basic.pm b/lib/Zonemaster/Engine/Test/Basic.pm index 388ed944e..54a73ebd9 100644 --- a/lib/Zonemaster/Engine/Test/Basic.pm +++ b/lib/Zonemaster/Engine/Test/Basic.pm @@ -473,13 +473,13 @@ sub basic01 { my $p_a = Zonemaster::Engine::Recursor->recurse( $ns_name, q{A} ); if ( $p_a and $p_a->rcode eq 'NOERROR' ) { - $rrs_ns{$ns_name}{'addresses'}{$_->address} = 1 for $p->get_records_for_name( 'A', $ns_name ); + $rrs_ns{$ns_name}{'addresses'}{$_->address} = 1 for $p_a->get_records_for_name( 'A', $ns_name ); } my $p_aaaa = Zonemaster::Engine::Recursor->recurse( $ns_name, q{AAAA} ); if ( $p_aaaa and $p_aaaa->rcode eq 'NOERROR' ) { - $rrs_ns{$ns_name}{'addresses'}{$_->address} = 1 for $p->get_records_for_name( 'AAAA', $ns_name ); + $rrs_ns{$ns_name}{'addresses'}{$_->address} = 1 for $p_aaaa->get_records_for_name( 'AAAA', $ns_name ); } }