X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=blobdiff_plain;f=t%2Ftest_spool%2Fversions%2Findices%2Fmake_index_from_stubs.pl;fp=t%2Ftest_spool%2Fversions%2Findices%2Fmake_index_from_stubs.pl;h=dbda1b002aa6d317aa9509e303230d5d7232d2c2;hp=5d56e14558447b3272a6958102e6eb6566f0554c;hb=6ba80f84f03691f4f90e6361fe0e02c9a5e202bb;hpb=1e32afc1bdd05ba7aaabe75be040824bfc339f2e diff --git a/t/test_spool/versions/indices/make_index_from_stubs.pl b/t/test_spool/versions/indices/make_index_from_stubs.pl index 5d56e14..dbda1b0 100755 --- a/t/test_spool/versions/indices/make_index_from_stubs.pl +++ b/t/test_spool/versions/indices/make_index_from_stubs.pl @@ -44,13 +44,13 @@ sub populate_index{ @stub_results = @{$stub_results[0]}; } if ((@stub_results % 2) == 0 and - not ref($stub_results[0]) and + not ref($stub_results[0]) ) { %stub_results_to_add = @stub_results; } else { for my $stub_result (@stub_results) { - next unless ref($stub_results); - next unless ref($stub_results) eq 'HASH'; + next unless ref($stub_result); + next unless ref($stub_result) eq 'HASH'; %stub_results_to_add = (%stub_results_to_add, %{$stub_result}); }