Unpack @_ first (PBP)

This commit is contained in:
Dan Church 2023-07-20 12:37:07 -05:00
parent 907a7113a8
commit 7dbbb5422a
Signed by: h3xx
GPG key ID: EA2BF379CD2CDBD0
8 changed files with 28 additions and 22 deletions

View file

@ -9,9 +9,9 @@ require Directory::Simplify::Utils;
# :squash-remove-end:
sub new {
my $class = shift;
my ($class, %args) = @_;
return bless {
@_,
%args,
}, $class;
}

View file

@ -11,11 +11,11 @@ require Directory::Simplify::Instruction::Hardlink;
# :squash-remove-end:
sub new {
my $class = shift;
my ($class, %args) = @_;
return bless {
filehash => undef,
min_size => 1,
@_,
%args,
}, $class;
}

View file

@ -9,10 +9,10 @@ require Directory::Simplify::Utils;
# :squash-remove-end:
sub new {
my $class = shift;
my ($class, %args) = @_;
return bless {
freed => 0,
@_,
%args,
}, $class;
}