Bug 30377: Fix two CGI::param called in list context-warnings

Trivial fix.

Test plan:
Delete two lines from opac search history.
Verify results. Check plack-opac-error.log.

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
This commit is contained in:
Marcel de Rooy 2022-03-28 12:07:43 +00:00 committed by Fridolin Somers
parent 4a35fd5363
commit 56107babc7
2 changed files with 2 additions and 2 deletions

View File

@ -102,7 +102,7 @@ unless ( $loggedinuser ) {
C4::Search::History::delete(
{
userid => $loggedinuser,
id => [ $cgi->param('id') ],
id => [ @id ],
}
);
} else {

View File

@ -59,7 +59,7 @@ my @serialnums=$input->multi_param('serialid');
if (@serialnums) { # i.e. they have been flagged to generate claims
my $err;
eval {
$err = SendAlerts('claimissues',\@serialnums,$input->param("letter_code"));
$err = SendAlerts( 'claimissues', \@serialnums, scalar $input->param("letter_code") );
if ( not ref $err or not exists $err->{error} ) {
C4::Serials::updateClaim( \@serialnums );
}