Lines 103-108
subtest 'BlockExpiredPatronOpacActions' => sub {
Link Here
|
103 |
$retrieved_category_1->delete; |
103 |
$retrieved_category_1->delete; |
104 |
is( Koha::Patron::Categories->search->count, $nb_of_categories + 1, 'Delete should have deleted the patron category' ); |
104 |
is( Koha::Patron::Categories->search->count, $nb_of_categories + 1, 'Delete should have deleted the patron category' ); |
105 |
|
105 |
|
|
|
106 |
my $new_category_4 = Koha::Patron::Category->new( |
107 |
{ categorycode => 'mycatcodeW', |
108 |
category_type => 'A', |
109 |
description => 'mycatdescW', |
110 |
upperagelimit => '', |
111 |
dateofbirthrequired => '', |
112 |
} |
113 |
)->store; |
114 |
is( Koha::Patron::Categories->search->count, $nb_of_categories + 2, 'upperagelimit and dateofbirthrequired should have a default value if empty string is passed' ); |
115 |
|
106 |
$schema->storage->txn_rollback; |
116 |
$schema->storage->txn_rollback; |
107 |
|
117 |
|
108 |
1; |
118 |
1; |
109 |
- |
|
|