|
Lines 86-91
subtest 'get_expiry_date' => sub {
Link Here
|
| 86 |
$retrieved_category_1->delete; |
86 |
$retrieved_category_1->delete; |
| 87 |
is( Koha::Patron::Categories->search->count, $nb_of_categories + 1, 'Delete should have deleted the patron category' ); |
87 |
is( Koha::Patron::Categories->search->count, $nb_of_categories + 1, 'Delete should have deleted the patron category' ); |
| 88 |
|
88 |
|
|
|
89 |
my $new_category_4 = Koha::Patron::Category->new( |
| 90 |
{ categorycode => 'mycatcodeW', |
| 91 |
category_type => 'A', |
| 92 |
description => 'mycatdescW', |
| 93 |
upperagelimit => '', |
| 94 |
dateofbirthrequired => '', |
| 95 |
} |
| 96 |
)->store; |
| 97 |
is( Koha::Patron::Categories->search->count, $nb_of_categories + 2, 'upperagelimit and dateofbirthrequired should have a default value if empty string is passed' ); |
| 98 |
|
| 89 |
$schema->storage->txn_rollback; |
99 |
$schema->storage->txn_rollback; |
| 90 |
|
100 |
|
| 91 |
1; |
101 |
1; |
| 92 |
- |
|
|