]> git.vanrenterghem.biz Git - git.ikiwiki.info.git/blob - t/html.t
git diffurl: Do not escape / in paths to changed files, in order to interoperate...
[git.ikiwiki.info.git] / t / html.t
1 #!/usr/bin/perl
2 use warnings;
3 use strict;
4 use Test::More;
6 my @pages;
8 BEGIN {
9         @pages=qw(index features news plugins/map security);
10         if (! -x "/usr/bin/validate") {
11                 plan skip_all => "/usr/bin/validate html validator not present";
12         }
13         else {
14                 plan(tests => int @pages + 2);
15         }
16         use_ok("IkiWiki");
17 }
19 # Have to build the html pages first.
20 # Note that just building them like this doesn't exersise all the possible
21 # html that can be generated, in particular it misses some of the action
22 # links at the top, etc.
23 ok(system("make >/dev/null") == 0);
25 foreach my $page (@pages) {
26         print "# Validating $page\n";
27         ok(system("validate html/$page.html") == 0);
28 }
30 # TODO: validate form output html