aboutsummaryrefslogtreecommitdiffstats
path: root/rpmtools.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2001-03-23 14:14:20 +0000
committerFrancois Pons <fpons@mandriva.com>2001-03-23 14:14:20 +0000
commit5887e3f23d4888e71b9ed2dfdc37b6ecbbe204d9 (patch)
tree7d9a3b2d73ceeec667a8c3c5786bfd48834e136e /rpmtools.pm
parent2de23e133d43c1a0ac50b0ad54bc40c8d1529c98 (diff)
downloadrpmtools-5887e3f23d4888e71b9ed2dfdc37b6ecbbe204d9.tar
rpmtools-5887e3f23d4888e71b9ed2dfdc37b6ecbbe204d9.tar.gz
rpmtools-5887e3f23d4888e71b9ed2dfdc37b6ecbbe204d9.tar.bz2
rpmtools-5887e3f23d4888e71b9ed2dfdc37b6ecbbe204d9.tar.xz
rpmtools-5887e3f23d4888e71b9ed2dfdc37b6ecbbe204d9.zip
*** empty log message ***
Diffstat (limited to 'rpmtools.pm')
-rw-r--r--rpmtools.pm9
1 files changed, 3 insertions, 6 deletions
diff --git a/rpmtools.pm b/rpmtools.pm
index 691e868..5bcb427 100644
--- a/rpmtools.pm
+++ b/rpmtools.pm
@@ -451,15 +451,12 @@ sub get_unresolved_provides_files {
#- this is necessary to try a second pass.
sub keep_only_cleaned_provides_files {
my ($params) = @_;
+ my @keeplist = map { /^\// } keys %{$params->{provides}};
- foreach (keys %{$params->{provides}}) {
- delete $params->{provides}{$_};
- /^\// and $params->{provides}{$_} = undef;
- }
-
- #- clean everything else at this point.
+ #- clean everything at this point, but keep file referenced.
$params->{info} = {};
$params->{depslist} = [];
+ $params->{provides} = {}; @{$params->{provides}}{@keeplist} = ();
}
#- reset params to allow other entries.