diff options
Diffstat (limited to 't/data/regenerate-data')
| -rwxr-xr-x | t/data/regenerate-data | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/t/data/regenerate-data b/t/data/regenerate-data index 9037170..b95b87f 100755 --- a/t/data/regenerate-data +++ b/t/data/regenerate-data @@ -51,9 +51,9 @@ for my $package (@packages) { # The test of spinning a tree of files uses a reference to App::DocKnot's own # POD documentation. Regenerate the expected output in case the POD has # changed. -my $source = File::Spec->catdir('lib', 'App', 'DocKnot.pm'); +my $source = File::Spec->catdir('lib', 'App', 'DocKnot.pm'); my $podthread = Pod::Thread->new(navbar => 1); -my $spin = App::DocKnot::Spin::Thread->new(); +my $spin = App::DocKnot::Spin::Thread->new(); my $thread; $podthread->output_string(\$thread); $podthread->parse_file($source); @@ -68,7 +68,7 @@ my $links = <<'EOD'; <link rel="top" href="../../../" /> EOD my $comment = '<!-- Spun by DocKnot %VERSION% on %DATE% -->'; -my $navbar = <<'EOD'; +my $navbar = <<'EOD'; <table class="navbar"><tr> <td class="navleft"></td> <td> @@ -93,7 +93,7 @@ $html =~ s{ (</body>) }{$navbar$address$1}xms; # Replace the expected data file. my $output = File::Spec->catdir( - 't', 'data', 'spin', 'output', 'software', 'docknot', + 't', 'data', 'spin', 'output', 'software', 'docknot', 'api', 'app-docknot.html', ); open(my $fh, '>', $output); |