X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/2d43eda27dce947bff8c86b4a2757589867fba23..d7d93c4047fda7d528b8ba3618d1d6b05ed49828:/t/basewiki_brokenlinks.t diff --git a/t/basewiki_brokenlinks.t b/t/basewiki_brokenlinks.t index 061841482..26e3859ab 100755 --- a/t/basewiki_brokenlinks.t +++ b/t/basewiki_brokenlinks.t @@ -1,17 +1,42 @@ #!/usr/bin/perl use warnings; use strict; -use Test::More 'no_plan'; +use Test::More; -ok(! system("mkdir t/tmp")); -ok(! system("make -s ikiwiki.out")); -ok(! system("make extra_install DESTDIR=`pwd`/t/tmp/install PREFIX=/usr >/dev/null")); -ok(! system("LC_ALL=C perl -T -I. ./ikiwiki.out -plugin smiley -plugin brokenlinks -rebuild -underlaydir=t/tmp/install/usr/share/ikiwiki/basewiki -templatedir=templates t/basewiki_brokenlinks t/tmp/out")); -my $result=`grep 'no broken links' t/tmp/out/index.html`; -ok(length($result)); -if (! length $result) { - print STDERR "broken links found:"; - system("grep '
  • ' t/tmp/out/index.html >&2"); +my $installed = $ENV{INSTALLED_TESTS}; + +ok(! system("rm -rf t/tmp; mkdir t/tmp")); + +my @command; +if ($installed) { + @command = qw(env LC_ALL=C ikiwiki); +} +else { + ok(! system("make -s ikiwiki.out")); + ok(! system("make underlay_install DESTDIR=`pwd`/t/tmp/install PREFIX=/usr >/dev/null")); + @command = qw(env LC_ALL=C perl -I. ./ikiwiki.out + --underlaydir=t/tmp/install/usr/share/ikiwiki/basewiki + --set underlaydirbase=t/tmp/install/usr/share/ikiwiki + --templatedir=templates); } -ok(-e "t/tmp/out/style.css"); -ok(! system("rm -rf t/tmp t/basewiki_brokenlinks/.ikiwiki")); + +foreach my $plugin ("", "listdirectives") { + ok(! system(@command, qw(--rebuild --plugin brokenlinks), + # always enabled because pages link to it conditionally, + # which brokenlinks cannot handle properly + qw(--plugin smiley), + ($plugin ? ("--plugin", $plugin) : ()), + qw(t/basewiki_brokenlinks t/tmp/out))); + my $result=`grep 'no broken links' t/tmp/out/index.html`; + ok(length($result)); + if (! length $result) { + print STDERR "\n\nbroken links found".($plugin ? " (with $plugin)" : "")."\n"; + system("grep '
  • ' t/tmp/out/index.html >&2"); + print STDERR "\n\n"; + } + ok(-e "t/tmp/out/style.css"); # linked to.. + ok(! system("rm -rf t/tmp/out t/basewiki_brokenlinks/.ikiwiki")); +} +ok(! system("rm -rf t/tmp")); + +done_testing();