|
Lines 585-596
my $view = $batch
Link Here
|
| 585 |
|
585 |
|
| 586 |
my @relatives; |
586 |
my @relatives; |
| 587 |
if ( $borrowernumber ) { |
587 |
if ( $borrowernumber ) { |
| 588 |
my $patron = Koha::Patrons->find( $borrower->{borrowernumber} ); |
588 |
if ( my $patron = Koha::Patrons->find( $borrower->{borrowernumber} ) ) { |
| 589 |
if ( my $guarantor = $patron->guarantor ) { |
589 |
if ( my $guarantor = $patron->guarantor ) { |
| 590 |
push @relatives, $guarantor->borrowernumber; |
590 |
push @relatives, $guarantor->borrowernumber; |
| 591 |
push @relatives, $_->borrowernumber for $patron->siblings; |
591 |
push @relatives, $_->borrowernumber for $patron->siblings; |
| 592 |
} else { |
592 |
} else { |
| 593 |
push @relatives, $_->borrowernumber for $patron->guarantees; |
593 |
push @relatives, $_->borrowernumber for $patron->guarantees; |
|
|
594 |
} |
| 594 |
} |
595 |
} |
| 595 |
} |
596 |
} |
| 596 |
my $relatives_issues_count = |
597 |
my $relatives_issues_count = |
| 597 |
- |
|
|