diff options
| -rw-r--r-- | URPM/Build.pm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/URPM/Build.pm b/URPM/Build.pm index 0b945b7..7b7fe8d 100644 --- a/URPM/Build.pm +++ b/URPM/Build.pm @@ -109,10 +109,8 @@ sub parse_rpms_build_headers { #- allow rereading of hdlist and clean. sub unresolved_provides_clean { my ($urpm) = @_; - my @potentially_unresolved = keys %{$urpm->{provides} || {}}; - - @$urpm{qw(depslist provides)} = ([], {}); - @{$urpm->{provides}}{@potentially_unresolved} = (); + $urpm->{depslist} = []; + $urpm->{provides}{$_} = undef for keys %{$urpm->{provides} || {}}; } #- read a list of headers (typically when building an hdlist when provides have |