diff options
author | Jelmer Vernooij <jelmer@samba.org> | 2007-09-11 23:53:25 +0000 |
---|---|---|
committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 15:06:41 -0500 |
commit | 2e6f0016d12000d7b8d8f5094d66e65ef618045b (patch) | |
tree | fb5325d378f3edbe3bf6b5a665a3f1783bc9671e /source4/selftest/selftest.pl | |
parent | 97f25fe522d71ad99a7a664e35422911de0af4e5 (diff) | |
download | samba-2e6f0016d12000d7b8d8f5094d66e65ef618045b.tar.gz samba-2e6f0016d12000d7b8d8f5094d66e65ef618045b.tar.bz2 samba-2e6f0016d12000d7b8d8f5094d66e65ef618045b.zip |
r25110: Show environment variables in HTML output.
(This used to be commit 62e770ace32f0e38863d4020773562e74117fc65)
Diffstat (limited to 'source4/selftest/selftest.pl')
-rwxr-xr-x | source4/selftest/selftest.pl | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/source4/selftest/selftest.pl b/source4/selftest/selftest.pl index 5b5c0146ad..7089cfa022 100755 --- a/source4/selftest/selftest.pl +++ b/source4/selftest/selftest.pl @@ -226,11 +226,12 @@ sub cleanup_pcap($$$) $state->{PCAP_FILE} = undef; } -sub run_testsuite($$$$$$) +sub run_testsuite($$$$$$$) { - my ($envname, $name, $cmd, $i, $totalsuites, $msg_ops) = @_; + my ($envname, $envvars, $name, $cmd, $i, $totalsuites, $msg_ops) = @_; my $msg_state = { ENVNAME => $envname, + ENVVARS => $envvars, NAME => $name, CMD => $cmd, INDEX => $i, @@ -755,7 +756,8 @@ $envvarstr next; } - run_testsuite($envname, $name, $cmd, $i, $suitestotal, $msg_ops); + run_testsuite($envname, $envvars, $name, $cmd, $i, $suitestotal, + $msg_ops); if (defined($opt_analyse_cmd)) { system("$opt_analyse_cmd \"$name\""); |