diff options
| author | Mystery Man <unknown@mandriva.org> | 2000-11-08 00:01:16 +0000 |
|---|---|---|
| committer | Mystery Man <unknown@mandriva.org> | 2000-11-08 00:01:16 +0000 |
| commit | d5c526273db473a7d87a26000585900fc10dda7d (patch) | |
| tree | 0fdaabe7a00921b6cc556601b103d344fc7ac781 /tools/gencompss | |
| parent | 9c164312d4bfff6d93e1c4529de6b992f2bebc44 (diff) | |
| download | drakx-d5c526273db473a7d87a26000585900fc10dda7d.tar drakx-d5c526273db473a7d87a26000585900fc10dda7d.tar.gz drakx-d5c526273db473a7d87a26000585900fc10dda7d.tar.bz2 drakx-d5c526273db473a7d87a26000585900fc10dda7d.tar.xz drakx-d5c526273db473a7d87a26000585900fc10dda7d.zip | |
This commit was manufactured by cvs2svn to create branch
'unlabeled-1.1.1'.
Diffstat (limited to 'tools/gencompss')
| -rwxr-xr-x | tools/gencompss | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tools/gencompss b/tools/gencompss index 333d02f0c..b26ef7c2c 100755 --- a/tools/gencompss +++ b/tools/gencompss @@ -4,11 +4,11 @@ open F, "bzip2 -dc @ARGV 2>/dev/null | hdlist2groups - |"; foreach (<F>) { chop; /(.*):(.*)/; - $l{$2}{$1} = undef; + push @{$l{$2}}, $1; } close F or die; foreach (sort keys %l) { print "$_\n"; - print "\t$_\n" foreach sort keys %{$l{$_}}; + print "\t$_\n" foreach sort @{$l{$_}}; print "\n"; } |