summaryrefslogtreecommitdiff
path: root/lib/App/DocKnot/Spin/Versions.pm
diff options
context:
space:
mode:
authorRuss Allbery <rra@cpan.org>2021-12-24 19:37:05 -0800
committerRuss Allbery <rra@cpan.org>2021-12-24 19:37:05 -0800
commit9257e00ec67fb1c0ad07d8d91fb2bfbdd1c14949 (patch)
tree1698767fa096f6959d47c95859622d7cc9fe43cb /lib/App/DocKnot/Spin/Versions.pm
parent74c5d402923e0d4085200a38cfddeea8af16f341 (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.pm6
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);