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

Bug 3387 follow-up: fix perlcritic error

Browse source
This commit is contained in:
Paul Poulain 2012-10-01 17:35:45 +02:00
parent 6d86d7bef2
commit f58a6f4e10
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
C4/Circulation.pm
View file

@ -1833,7 +1833,8 @@ sub AddReturn {
# find reserves.....
# if we don't have a reserve with the status W, we launch the Checkreserves routine
my ($resfound, $resrec, undef) = C4::Reserves::CheckReserves( $item->{'itemnumber'} ) unless ( $item->{'wthdrawn'} );
my ($resfound, $resrec);
($resfound, $resrec, undef) = C4::Reserves::CheckReserves( $item->{'itemnumber'} ) unless ( $item->{'wthdrawn'} );
if ($resfound) {
$resrec->{'ResFound'} = $resfound;
$messages->{'ResFound'} = $resrec;