Revision c13c09e6
Von Jan Büren vor etwa 8 Jahren hinzugefügt
| SL/BackgroundJob/SelfTest.pm | ||
|---|---|---|
| 48 | 48 |
|
| 49 | 49 |
sub run {
|
| 50 | 50 |
my $self = shift; |
| 51 |
my $db_obj = shift; |
|
| 52 |
# options |
|
| 53 |
my $options = $db_obj->data_as_hash; |
|
| 54 | 51 |
$self->setup; |
| 55 | 52 |
|
| 56 | 53 |
return 1 unless $self->modules; |
| 57 | 54 |
|
| 58 |
|
|
| 59 |
$main::lxdebug->message(0, 'optioni' . Dumper($self->modules)); |
|
| 60 | 55 |
foreach my $module ($self->modules) {
|
| 61 |
next unless $module eq $options->{module};
|
|
| 62 |
$main::lxdebug->message(0, 'hieur' . $module); |
|
| 63 | 56 |
$self->run_module($module); |
| 64 | 57 |
} |
| 65 | 58 |
|
| ... | ... | |
| 102 | 95 |
} or $self->add_errors($::locale->text('Could not load class #1 (#2): "#3"', $module, $file, $@)) && return;
|
| 103 | 96 |
|
| 104 | 97 |
eval {
|
| 105 |
$self->tester->subtest($module => sub {
|
|
| 106 |
$module->new->run; |
|
| 107 |
}); |
|
| 108 |
1 |
|
| 98 |
my $worker = $module->new; |
|
| 99 |
$worker->tester($self->tester); |
|
| 100 |
|
|
| 101 |
$worker->run; |
|
| 102 |
1; |
|
| 109 | 103 |
} or $self->add_errors($::locale->text('Could not load class #1, #2', $module, $@)) && return;
|
| 110 | 104 |
|
| 111 | 105 |
$self->add_full_diag($output); |
Auch abrufbar als: Unified diff
Revert "Mehr als eine SelfTest-Modul prüfen"
git add --patch falsch angewandt.
This reverts commit db4680753f5ec1de62bdc0557f850afd810444d1.