aboutsummaryrefslogtreecommitdiffstats
path: root/rpmtools.pm
diff options
context:
space:
mode:
Diffstat (limited to 'rpmtools.pm')
-rw-r--r--rpmtools.pm10
1 files changed, 8 insertions, 2 deletions
diff --git a/rpmtools.pm b/rpmtools.pm
index 0cb0f8d..a3655d2 100644
--- a/rpmtools.pm
+++ b/rpmtools.pm
@@ -554,7 +554,7 @@ sub write_provides {
#- read compss, look at DrakX for more info.
sub read_compss {
my ($params, $FILE) = @_;
- my $p;
+ my ($p, %compss);
local $_;
while (<$FILE>) {
@@ -565,9 +565,15 @@ sub read_compss {
$p = $1;
} else {
/(\S+)/;
- $params->{info}{$1} and $params->{info}{$1}{group} = $p;
+ $compss{$1} = $p;
}
}
+
+ #- mark all packages which matching name with group.
+ foreach (@{$params->{depslist}}) {
+ $compss{$_->{name}} and $_->{group} = $compss{$_->{name}};
+ }
+
1;
}