diff options
Diffstat (limited to 'URPM.pm')
-rw-r--r-- | URPM.pm | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -19,6 +19,7 @@ sub new { my $self = bless { depslist => [], provides => {}, + obsoletes => {}, }, $class; $self->{nofatal} = 1 if $options{nofatal}; $self; @@ -31,6 +32,11 @@ sub packages_providing { map { $urpm->{depslist}[$_] } keys %{$urpm->{provides}{$name} || {}}; } +sub packages_obsoleting { + my ($urpm, $name) = @_; + map { $urpm->{depslist}[$_] } keys %{$urpm->{obsoletes}{$name} || {}}; +} + sub packages_by_name { my ($urpm, $name) = @_; grep { $name eq $_->name } packages_providing($urpm, $name); |