Revision 3b3e1554
Von Bernd Bleßmann vor fast 5 Jahren hinzugefügt
SL/BackgroundJob/SelfTest.pm | ||
---|---|---|
26 | 26 |
'add_full_diag' => { interface => 'add', hash_key => 'full_diag' }, |
27 | 27 |
], |
28 | 28 |
scalar => [ |
29 |
qw(diag tester config aggreg), |
|
29 |
qw(diag tester config aggreg module_nr),
|
|
30 | 30 |
], |
31 | 31 |
); |
32 | 32 |
|
... | ... | |
88 | 88 |
$module =~ s/[^\w:]//g; |
89 | 89 |
$module = "SL::BackgroundJob::SelfTest::$module"; |
90 | 90 |
|
91 |
# increase module nr |
|
92 |
$self->module_nr(($self->module_nr || 0) + 1); |
|
93 |
|
|
91 | 94 |
# try to load module; |
92 | 95 |
(my $file = $module) =~ s|::|/|g; |
93 | 96 |
eval { |
... | ... | |
103 | 106 |
} or $self->add_errors($::locale->text('Could not load class #1, #2', $module, $@)) && return; |
104 | 107 |
|
105 | 108 |
$self->add_full_diag($output); |
106 |
$self->{diag_per_module}{$module} = $output; |
|
109 |
$self->{diag_per_module}{$self->module_nr . ': ' . $module} = $output;
|
|
107 | 110 |
|
108 | 111 |
my $parser = TAP::Parser->new({ tap => $output}); |
109 | 112 |
$parser->run; |
templates/mail/self_test/status_mail.txt | ||
---|---|---|
15 | 15 |
Full report: |
16 | 16 |
------------ |
17 | 17 |
|
18 |
[% FOREACH module = SELF.diag_per_module.keys %] |
|
18 |
[% FOREACH module = SELF.diag_per_module.keys.sort %]
|
|
19 | 19 |
Module: [% module %] |
20 | 20 |
-------------------- |
21 | 21 |
|
Auch abrufbar als: Unified diff
SL/BackgroundJob/SelfTest: eine lfd. Modulnummer hinzufügen.
Die Ergebnisse für das E-Mail-Template liegen in einem Hash mit den
Modul-Namen als keys. Im Template wird über die keys iteriert, damit ist
die Reihenfolge aber nicht garantiert. Deshalb wird hier eine Modulnummer
vor dem Namen eingefügt und die Ergbenisse sortiert - so kommen die Ergebisse
in der Reihenfolge der Module in der Konfig-Datei.