|
Lines 513-526
if ( $messages->{'ResFound'}) {
Link Here
|
| 513 |
|
513 |
|
| 514 |
if ( $messages->{'RecallFound'} ){ |
514 |
if ( $messages->{'RecallFound'} ){ |
| 515 |
my $recall = $messages->{'Recall'}; |
515 |
my $recall = $messages->{'Recall'}; |
|
|
516 |
warn $userenv_branch; |
| 517 |
warn $recall->branchcode; |
| 518 |
my $transfer_recall; |
| 519 |
if ($userenv_branch eq $recall->branchcode) { |
| 520 |
$transfer_recall = 0; |
| 521 |
} else { |
| 522 |
$transfer_recall = 1; |
| 523 |
} |
| 516 |
my $patron = Koha::Patrons->find( $recall->borrowernumber ); |
524 |
my $patron = Koha::Patrons->find( $recall->borrowernumber ); |
| 517 |
$template->param( |
525 |
$template->param( |
| 518 |
patron => $patron, |
526 |
patron => $patron, |
| 519 |
found => 1, |
527 |
found => 1, |
| 520 |
recalled => 1, |
528 |
recalled => 1, |
| 521 |
recall => $recall, |
529 |
recall => $recall, |
| 522 |
transfer_recall => ($userenv_branch eq $recall->branchcode ? 1 : 0 ) |
530 |
transfer_recall => $transfer_recall, |
| 523 |
# address => $patron->address, |
531 |
address => $patron->address, |
| 524 |
# address2 => $patron->address2, |
532 |
# address2 => $patron->address2, |
| 525 |
# streetnumber => $patron->streetnumber, |
533 |
# streetnumber => $patron->streetnumber, |
| 526 |
# city => $patron->city, |
534 |
# city => $patron->city, |