diff options
Diffstat (limited to 'script/perlpkg.pl')
-rwxr-xr-x | script/perlpkg.pl | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/script/perlpkg.pl b/script/perlpkg.pl index 03bdb92..195adc9 100755 --- a/script/perlpkg.pl +++ b/script/perlpkg.pl @@ -51,11 +51,8 @@ Log::Any::Adapter->set('Log4perl'); my $app = App::ArchLinux::PackagerTools->new(); use Data::Dumper; -my $dists = $app->get_distributions_in_repo(); -my $dist_names = [map {$_->{dist_name}} $dists->@*]; -my $updateable = $app->get_updateable_packages($dist_names); -my $pkgs = $app->add_maintainers($updateable); -my $filtered_pkgs = $app->filter_by_maintainer($pkgs); + +my $filtered_pkgs = $app->get_filtered_updateable_packages(); print Dumper($filtered_pkgs); |