Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 13544: Make it explicit that getauthtypes returns a hash ref

Browse source 
Prior to perl 5.12 keys can only operate on a hash.

Test plan:
With perl 5.10, access to admin/auth_subfields_structure.pl.
Without this patch, you get:
Type of arg 1 to keys must be hash (not subroutine entry) at
/home/koha/src/admin/auth_subfields_structure.pl line 102, near
"getauthtypes)"

Signed-off-by: Katrin Fischer <Katrin.Fischer.83@web.de>
Confirmed problem and tested patch on a sandbox, signed off locally.

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
This commit is contained in:
Jonathan Druart 2015-01-09 16:01:35 +01:00 committed by Tomas Cohen Arazi
parent ac3f497f64
commit c9af47b86c
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
admin/auth_subfields_structure.pl
View file

@ -99,7 +99,7 @@ if ($op eq 'add_form') {
push @$authorised_values, 'itemtypes';
# build thesaurus categories list
my @authtypes = (sort keys getauthtypes);
my @authtypes = (sort keys %{C4::Koha::getauthtypes()});
# build value_builder list
my @value_builder=('');