X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FBackgroundJob%2FSelfTest.pm;h=b715f9e07d11605b554888dde60a0cd2d17caf66;hb=3873385f84a2af41d00e1154bfa4a8a47c761aeb;hp=d5811fd0533390569385fa24d023374552cbacd1;hpb=8da82ce0e57e5ae5a05f4fec2dea1fb049aadf10;p=kivitendo-erp.git diff --git a/SL/BackgroundJob/SelfTest.pm b/SL/BackgroundJob/SelfTest.pm index d5811fd05..b715f9e07 100644 --- a/SL/BackgroundJob/SelfTest.pm +++ b/SL/BackgroundJob/SelfTest.pm @@ -26,7 +26,7 @@ use Rose::Object::MakeMethods::Generic ( 'add_full_diag' => { interface => 'add', hash_key => 'full_diag' }, ], scalar => [ - qw(diag tester config aggreg), + qw(diag tester config aggreg module_nr), ], ); @@ -88,6 +88,9 @@ sub run_module { $module =~ s/[^\w:]//g; $module = "SL::BackgroundJob::SelfTest::$module"; + # increase module nr + $self->module_nr(($self->module_nr || 0) + 1); + # try to load module; (my $file = $module) =~ s|::|/|g; eval { @@ -103,7 +106,7 @@ sub run_module { } or $self->add_errors($::locale->text('Could not load class #1, #2', $module, $@)) && return; $self->add_full_diag($output); - $self->{diag_per_module}{$module} = $output; + $self->{diag_per_module}{$self->module_nr . ': ' . $module} = $output; my $parser = TAP::Parser->new({ tap => $output}); $parser->run;