Lines 354-361
sub transferbook {
Link Here
|
354 |
CheckReserves( $itemnumber ); |
354 |
CheckReserves( $itemnumber ); |
355 |
if ( $resfound and not $ignoreRs ) { |
355 |
if ( $resfound and not $ignoreRs ) { |
356 |
$resrec->{'ResFound'} = $resfound; |
356 |
$resrec->{'ResFound'} = $resfound; |
357 |
|
357 |
$messages->{'ResFound'} = $resrec; |
358 |
# $messages->{'ResFound'} = $resrec; |
|
|
359 |
$dotransfer = 1; |
358 |
$dotransfer = 1; |
360 |
} |
359 |
} |
361 |
|
360 |
|