From 8f086c03def1303b72205e7ef43ce89346e33c12 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Wed, 8 Dec 2021 15:32:14 +0100 Subject: [PATCH] Bug 29660: Unused code in placerequest.pl Signed-off-by: Nick Clemens --- .../prog/en/modules/reserve/request.tt | 1 - reserve/placerequest.pl | 13 ------------- 2 files changed, 14 deletions(-) diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/reserve/request.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/reserve/request.tt index 306b8eaca0..1ed634dca3 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/reserve/request.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/reserve/request.tt @@ -539,7 +539,6 @@ [% ELSE %] [% END %] - diff --git a/reserve/placerequest.pl b/reserve/placerequest.pl index 9f6d82dc4f..77d1c122f6 100755 --- a/reserve/placerequest.pl +++ b/reserve/placerequest.pl @@ -34,7 +34,6 @@ my $input = CGI->new(); checkauth($input, 0, { reserveforothers => 'place_holds' }, 'intranet'); -my @bibitems = $input->multi_param('biblioitem'); my @reqbib = $input->multi_param('reqbib'); my $biblionumber = $input->param('biblionumber'); my $borrowernumber = $input->param('borrowernumber'); @@ -72,18 +71,6 @@ my $found; if ( $type eq 'str8' && $patron ) { foreach my $biblionumber ( keys %bibinfos ) { - my $count = @bibitems; - @bibitems = sort @bibitems; - my $i2 = 1; - my @realbi; - $realbi[0] = $bibitems[0]; - for ( my $i = 1 ; $i < $count ; $i++ ) { - my $i3 = $i2 - 1; - if ( $realbi[$i3] ne $bibitems[$i] ) { - $realbi[$i2] = $bibitems[$i]; - $i2++; - } - } my $can_override = C4::Context->preference('AllowHoldPolicyOverride'); if ( defined $checkitem && $checkitem ne '' ) { -- 2.30.2