|
Lines 80-86
subtest 'guarantees' => sub {
Link Here
|
| 80 |
subtest 'siblings' => sub { |
80 |
subtest 'siblings' => sub { |
| 81 |
plan tests => 7; |
81 |
plan tests => 7; |
| 82 |
my $siblings = $new_patron_1->siblings; |
82 |
my $siblings = $new_patron_1->siblings; |
| 83 |
is( ref($siblings), 'Koha::Patrons', 'Koha::Patron->siblings should not crashed if the patron has not guarantor' ); |
83 |
is( $siblings, undef, 'Koha::Patron->siblings should not crashed if the patron has no guarantor' ); |
| 84 |
my $guarantee_1 = $builder->build( { source => 'Borrower', value => { guarantorid => $new_patron_1->borrowernumber } } ); |
84 |
my $guarantee_1 = $builder->build( { source => 'Borrower', value => { guarantorid => $new_patron_1->borrowernumber } } ); |
| 85 |
my $retrieved_guarantee_1 = Koha::Patrons->find($guarantee_1); |
85 |
my $retrieved_guarantee_1 = Koha::Patrons->find($guarantee_1); |
| 86 |
$siblings = $retrieved_guarantee_1->siblings; |
86 |
$siblings = $retrieved_guarantee_1->siblings; |
| 87 |
- |
|
|