X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=catalogue%2Fimage.pl;h=d1fcba72d20f6834e7729418a4e1d68a4e55b710;hb=a6f8b23035a49110c759b5dc91656411cdb209c3;hp=f347640652e99d4b79c91cecd757f7fef91605b0;hpb=a6c9bd0eb55c32d5632625144775271f20aa15f7;p=koha.git diff --git a/catalogue/image.pl b/catalogue/image.pl index f347640652..d1fcba72d2 100755 --- a/catalogue/image.pl +++ b/catalogue/image.pl @@ -23,8 +23,7 @@ # # -use strict; -use warnings; +use Modern::Perl; use CGI qw ( -utf8 ); #qw(:standard escapeHTML); use C4::Context; @@ -64,7 +63,7 @@ if ( C4::Context->preference("LocalCoverImages") ) { $imagenumber = $data->param('imagenumber'); } elsif ( defined $data->param('biblionumber') ) { - my @imagenumbers = ListImagesForBiblio( $data->param('biblionumber') ); + my @imagenumbers = ListImagesForBiblio( $data->multi_param('biblionumber') ); if (@imagenumbers) { $imagenumber = $imagenumbers[0]; }