|
Lines 54-60
is( Koha::Patron::Categories->search->count, $nb_of_categories + 2, 'The 2 patro
Link Here
|
| 54 |
|
54 |
|
| 55 |
my $retrieved_category_1 = Koha::Patron::Categories->find( $new_category_1->categorycode ); |
55 |
my $retrieved_category_1 = Koha::Patron::Categories->find( $new_category_1->categorycode ); |
| 56 |
is( $retrieved_category_1->categorycode, $new_category_1->categorycode, 'Find a patron category by categorycode should return the correct category' ); |
56 |
is( $retrieved_category_1->categorycode, $new_category_1->categorycode, 'Find a patron category by categorycode should return the correct category' ); |
| 57 |
is_deeply( [ $retrieved_category_1->library_limits->get_column('branchcode') ], [ $library_1->branchcode, $library_2->branchcode ], 'The branch limitation should have been stored and retrieved' ); |
57 |
is_deeply( [ sort $retrieved_category_1->library_limits->get_column('branchcode') ], [ sort $library_1->branchcode, $library_2->branchcode ], 'The branch limitation should have been stored and retrieved' ); |
| 58 |
is_deeply( $retrieved_category_1->default_messaging, [], 'By default there is not messaging option' ); |
58 |
is_deeply( $retrieved_category_1->default_messaging, [], 'By default there is not messaging option' ); |
| 59 |
|
59 |
|
| 60 |
my $retrieved_category_2 = Koha::Patron::Categories->find( $new_category_2->categorycode ); |
60 |
my $retrieved_category_2 = Koha::Patron::Categories->find( $new_category_2->categorycode ); |
| 61 |
- |
|
|