diff options
Diffstat (limited to 'lib/App/ArchLinux/PackagerTools/Pacman.pm')
-rw-r--r-- | lib/App/ArchLinux/PackagerTools/Pacman.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/App/ArchLinux/PackagerTools/Pacman.pm b/lib/App/ArchLinux/PackagerTools/Pacman.pm index f541721..3204ca1 100644 --- a/lib/App/ArchLinux/PackagerTools/Pacman.pm +++ b/lib/App/ArchLinux/PackagerTools/Pacman.pm @@ -35,17 +35,17 @@ Returns a new instance. =cut -method new($class: $deps = {}) { - $deps->{cpan} //= App::ArchLinux::PackagerTools::CPAN->new({$deps->%{context}}); +method new($class: $context, $deps = {}) { + $deps->{cpan} //= App::ArchLinux::PackagerTools::CPAN->new($context); $deps->{pkgname_cpan_name_map} //= { # pkgname => cpan_name 'perl-critic' => 'Perl::Critic', 'perl-libintl-perl' => 'libintl-perl', }; - return $class->new_no_defaults($deps); + return $class->new_no_defaults($context, $deps); } -method new_no_defaults($class: $deps = {}) { +method new_no_defaults($class: $context, $deps = {}) { my $self = {}; bless $self, $class; $deps->{cpan_name_pkgname_map} = {reverse $deps->{pkgname_cpan_name_map}->%*}; |