diff options
author | Russ Allbery <rra@cpan.org> | 2021-12-24 19:37:05 -0800 |
---|---|---|
committer | Russ Allbery <rra@cpan.org> | 2021-12-24 19:37:05 -0800 |
commit | 9257e00ec67fb1c0ad07d8d91fb2bfbdd1c14949 (patch) | |
tree | 1698767fa096f6959d47c95859622d7cc9fe43cb /t/data/regenerate-data | |
parent | 74c5d402923e0d4085200a38cfddeea8af16f341 (diff) |
Reformat code
Adopt the new -nvc option in Perl::Tidy 20211029 to disable the
intrusive vertical alignment formatting. Unfortunately, this
breaks all vertical alignment formatting, even when desired, so
work around that in a few places with special comments.
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); |