Bug 9659 follow-up: correct syntax for older Perl
A construction that was a syntax error in older versions of Perl was causing problems for jenkins. This patch fixes it. Signed-off-by: Jared Camins-Esakov <jcamins@cpbibliography.com>
This commit is contained in:
parent
9fbdc7b1d6
commit
906bf789fe
|
|
@ -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');
|
||||
}
|
||||
|
|
|
|||
Loading…
Reference in New Issue