diff options
| -rw-r--r-- | perl-install/install_any.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 0196e293a..6c9eae5c3 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -1163,6 +1163,11 @@ sub install { $do->{o}->pkg_install(@l); } +sub what_provides { + my ($do, $name) = @; + map { $do->{o}{packages}{depslist}[$_]->name } keys %{$do->{o}{packages}{provides}{$name} || {}}; +} + sub is_installed { my ($do, @l) = @_; foreach (@l) { |