From 23c22ae05ec5203dcaf93ec4194b8ec2a5408f28 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Thu, 25 May 2000 18:45:50 +0000
Subject: *** empty log message ***

---
 tools/gencompss | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'tools')

diff --git a/tools/gencompss b/tools/gencompss
index b26ef7c2c..333d02f0c 100755
--- a/tools/gencompss
+++ b/tools/gencompss
@@ -4,11 +4,11 @@ open F, "bzip2 -dc @ARGV 2>/dev/null | hdlist2groups - |";
 foreach (<F>) {
     chop;
     /(.*):(.*)/;
-    push @{$l{$2}}, $1;
+    $l{$2}{$1} = undef;
 }
 close F or die;
 foreach (sort keys %l) {
     print "$_\n";
-    print "\t$_\n" foreach sort @{$l{$_}};
+    print "\t$_\n" foreach sort keys %{$l{$_}};
     print "\n";
 }
-- 
cgit v1.2.1