diff --git a/t/db_dependent/ReportsGuided.t b/t/db_dependent/ReportsGuided.t index 26e1a49271..200dd86bef 100755 --- a/t/db_dependent/ReportsGuided.t +++ b/t/db_dependent/ReportsGuided.t @@ -64,7 +64,7 @@ SKIP: { 'Not defined authorised value category is invalid'); # Loop through the reserved authorised values - foreach my $authorised_value ( keys GetReservedAuthorisedValues() ) { + foreach my $authorised_value ( keys %{GetReservedAuthorisedValues()} ) { ok( IsAuthorisedValueValid($authorised_value), '\''.$authorised_value.'\' is a reserved word, and thus a valid authorised value'); }