From f2b5d9bacf8e109fe27cea8f68232d41fd3b3ea5 Mon Sep 17 00:00:00 2001 From: Florian Pritz Date: Mon, 17 Dec 2018 16:33:25 +0100 Subject: Make context parameter explicit This prevents a loop in $deps->{..}->{context} which is 1) unnecessary and 2) potentially breaks memory recovery when things get deleted. Not the case right now, but whatever. Signed-off-by: Florian Pritz --- lib/App/ArchLinux/PackagerTools/CPAN/PackagesDetailsFetcher.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'lib/App/ArchLinux/PackagerTools/CPAN/PackagesDetailsFetcher.pm') diff --git a/lib/App/ArchLinux/PackagerTools/CPAN/PackagesDetailsFetcher.pm b/lib/App/ArchLinux/PackagerTools/CPAN/PackagesDetailsFetcher.pm index 734669c..88122da 100644 --- a/lib/App/ArchLinux/PackagerTools/CPAN/PackagesDetailsFetcher.pm +++ b/lib/App/ArchLinux/PackagerTools/CPAN/PackagesDetailsFetcher.pm @@ -30,12 +30,12 @@ Returns a new instance. =cut -method new($class: $deps = {}) { - $deps->{cache} //= App::ArchLinux::PackagerTools::Cache->new({$deps->%{context}}); - return $class->new_no_defaults($deps); +method new($class: $context, $deps = {}) { + $deps->{cache} //= App::ArchLinux::PackagerTools::Cache->new($context); + 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; $self->{deps} = $deps; -- cgit v1.2.3-24-g4f1b