|
Lines 193-212
subtest 'Test delete via UploadedFile as well as UploadedFiles' => sub {
Link Here
|
| 193 |
}; |
193 |
}; |
| 194 |
|
194 |
|
| 195 |
subtest 'Test delete_missing' => sub { |
195 |
subtest 'Test delete_missing' => sub { |
| 196 |
plan tests => 4; |
196 |
plan tests => 5; |
| 197 |
|
197 |
|
| 198 |
# If we add files via TestBuilder, they do not exist |
198 |
# If we add files via TestBuilder, they do not exist |
| 199 |
my $upload01 = $builder->build({ source => 'UploadedFile' }); |
199 |
my $upload01 = $builder->build({ source => 'UploadedFile' }); |
| 200 |
my $upload02 = $builder->build({ source => 'UploadedFile' }); |
200 |
my $upload02 = $builder->build({ source => 'UploadedFile' }); |
| 201 |
# dry run first |
201 |
# dry run first |
| 202 |
my $deleted = Koha::UploadedFiles->delete_missing({ keep_record => 1 }); |
202 |
my $deleted = Koha::UploadedFiles->delete_missing({ keep_record => 1 }); |
| 203 |
is( $deleted, 2, 'Expect two missing files' ); |
203 |
is( $deleted, 2, 'Expect two records with missing files' ); |
| 204 |
isnt( Koha::UploadedFiles->find( $upload01->{id} ), undef, 'Not deleted' ); |
204 |
isnt( Koha::UploadedFiles->find( $upload01->{id} ), undef, 'Not deleted' ); |
| 205 |
$deleted = Koha::UploadedFiles->delete_missing; |
205 |
$deleted = Koha::UploadedFiles->delete_missing; |
| 206 |
is( $deleted, 2, 'Deleted two missing files' ); |
206 |
ok( $deleted =~ /^(2|-1)$/, 'Deleted two records with missing files' ); |
| 207 |
is( Koha::UploadedFiles->search({ |
207 |
is( Koha::UploadedFiles->search({ |
| 208 |
id => [ $upload01->{id}, $upload02->{id} ], |
208 |
id => [ $upload01->{id}, $upload02->{id} ], |
| 209 |
})->count, 0, 'Records are gone' ); |
209 |
})->count, 0, 'Records are gone' ); |
|
|
210 |
# Repeat it |
| 211 |
$deleted = Koha::UploadedFiles->delete_missing; |
| 212 |
is( $deleted, "0E0", "Return value of 0E0 expected" ); |
| 210 |
}; |
213 |
}; |
| 211 |
|
214 |
|
| 212 |
subtest 'Call search_term with[out] private flag' => sub { |
215 |
subtest 'Call search_term with[out] private flag' => sub { |
| 213 |
- |
|
|