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 /lib/App/DocKnot/Spin/Versions.pm | |
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 'lib/App/DocKnot/Spin/Versions.pm')
-rw-r--r-- | lib/App/DocKnot/Spin/Versions.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/App/DocKnot/Spin/Versions.pm b/lib/App/DocKnot/Spin/Versions.pm index b804b08..9aa07f2 100644 --- a/lib/App/DocKnot/Spin/Versions.pm +++ b/lib/App/DocKnot/Spin/Versions.pm @@ -84,9 +84,9 @@ sub _read_data { if (!defined($time)) { die "invalid line $. in $path\n"; } - @depends = @files; + @depends = @files; $timestamp = _datetime_to_seconds($date, $time, $path); - $date = strftime('%Y-%m-%d', gmtime($timestamp)); + $date = strftime('%Y-%m-%d', gmtime($timestamp)); $self->{versions}{$package} = [$version, $date]; } @@ -120,7 +120,7 @@ sub new { # Create an empty object. my $self = { - depends => {}, + depends => {}, versions => {}, }; bless($self, $class); |