Lines 265-270
$patstodel = GetBorrowersToExpunge( {not_borrowed_since => '2016-01-02', patron_
Link Here
|
265 |
ok( scalar(@$patstodel) == 1 && $patstodel->[0]->{'borrowernumber'} eq $bor2inlist,'Staff patron not deleted by last issue date'); |
265 |
ok( scalar(@$patstodel) == 1 && $patstodel->[0]->{'borrowernumber'} eq $bor2inlist,'Staff patron not deleted by last issue date'); |
266 |
|
266 |
|
267 |
Koha::Patrons->find($bor1inlist)->set({ categorycode => 'CIVILIAN' })->store; |
267 |
Koha::Patrons->find($bor1inlist)->set({ categorycode => 'CIVILIAN' })->store; |
|
|
268 |
|
269 |
t::lib::Mocks::mock_preference( 'borrowerRelationship', 'test' ); |
270 |
|
268 |
my $relationship = Koha::Patron::Relationship->new( { guarantor_id => $bor1inlist, guarantee_id => $guarantee->{borrowernumber}, relationship => 'test' } )->store(); |
271 |
my $relationship = Koha::Patron::Relationship->new( { guarantor_id => $bor1inlist, guarantee_id => $guarantee->{borrowernumber}, relationship => 'test' } )->store(); |
269 |
|
272 |
|
270 |
$patstodel = GetBorrowersToExpunge( {patron_list_id => $list1->patron_list_id()} ); |
273 |
$patstodel = GetBorrowersToExpunge( {patron_list_id => $list1->patron_list_id()} ); |
271 |
- |
|
|