|
Lines 19-25
Link Here
|
| 19 |
|
19 |
|
| 20 |
use Modern::Perl; |
20 |
use Modern::Perl; |
| 21 |
|
21 |
|
| 22 |
use Test::More tests => 12; |
22 |
use Test::More tests => 6; |
| 23 |
|
23 |
|
| 24 |
use Koha::Library; |
24 |
use Koha::Library; |
| 25 |
use Koha::Libraries; |
25 |
use Koha::Libraries; |
|
Lines 53-61
is( $retrieved_library_1->branchname, $new_library_1->branchname, 'Find a librar
Link Here
|
| 53 |
$retrieved_library_1->delete; |
53 |
$retrieved_library_1->delete; |
| 54 |
is( Koha::Libraries->search->count, $nb_of_libraries + 1, 'Delete should have deleted the library' ); |
54 |
is( Koha::Libraries->search->count, $nb_of_libraries + 1, 'Delete should have deleted the library' ); |
| 55 |
|
55 |
|
| 56 |
$retrieved_category_2->delete; |
|
|
| 57 |
is( Koha::LibraryCategories->search->count, $nb_of_categories + 2, 'Delete should have deleted the library category' ); |
| 58 |
|
| 59 |
# Stockrotation relationship testing |
56 |
# Stockrotation relationship testing |
| 60 |
|
57 |
|
| 61 |
my $new_library_sr = $builder->build({ source => 'Branch' }); |
58 |
my $new_library_sr = $builder->build({ source => 'Branch' }); |
| 62 |
- |
|
|