Unverified Commit 1c2cdcb3 authored by boklm's avatar boklm
Browse files

Add a page listing available tests

parent 4ea3fbf0

TBBTestSuite/Reports.pm

+3 −0
Original line number Diff line number Diff line
@@ -10,6 +10,7 @@ use File::Spec; 
use YAML;

use TBBTestSuite::Common qw(exit_error);

use TBBTestSuite::Options qw($options);

use TBBTestSuite::Tests;



sub set_report_dir {

    my ($report) = @_;
@@ -65,6 +66,8 @@ sub make_reports_index { 
        reports_by_time => \@reports_by_time,

    };

    $template->process('reports_index.html', $vars, 'index.html');

    $template->process('tests_index.html', { %$vars, tests =>

            \@TBBTestSuite::Tests::tests }, 'tests.html');

}



1;

tmpl/reports_index.html

+2 −0
Original line number Diff line number Diff line
@@ -46,5 +46,7 @@ 
            </tr>

            [% END %]

        </table>

        <hr />

        <a href="tests.html">Available tests</a>

    </body>

</html>

tmpl/tests_index.html

0 → 100644
+14 −0
Original line number Diff line number Diff line 
[% USE date -%]

<html>

    <head>

        <title>Available Tests</title>

    </head>

    <body>

        <h1>Available Tests</h1>



        [% FOREACH test IN tests %]

        <h2>[% test.name %] ([% test.type %])</h2>

        <p>[% test.descr %]</p>

        [% END %]

    </body>

</html>