Lines 1457-1463
sub AddIssue {
Link Here
|
1457 |
comments => 'Forced branchtransfer' |
1457 |
comments => 'Forced branchtransfer' |
1458 |
} |
1458 |
} |
1459 |
)->store; |
1459 |
)->store; |
1460 |
if ( $transfer->reason eq 'Reserve' ) { |
1460 |
if ( $transfer->reason && $transfer->reason eq 'Reserve' ) { |
1461 |
my $hold = $item_object->holds->search( { found => 'T' } )->next; |
1461 |
my $hold = $item_object->holds->search( { found => 'T' } )->next; |
1462 |
if ( $hold ) { # Is this really needed? |
1462 |
if ( $hold ) { # Is this really needed? |
1463 |
$hold->set( { found => undef } )->store; |
1463 |
$hold->set( { found => undef } )->store; |
1464 |
- |
|
|