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:
parent
4a35fd5363
commit
56107babc7
|
|
@ -102,7 +102,7 @@ unless ( $loggedinuser ) {
|
|||
C4::Search::History::delete(
|
||||
{
|
||||
userid => $loggedinuser,
|
||||
id => [ $cgi->param('id') ],
|
||||
id => [ @id ],
|
||||
}
|
||||
);
|
||||
} else {
|
||||
|
|
|
|||
|
|
@ -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 );
|
||||
}
|
||||
|
|
|
|||
Loading…
Reference in New Issue