From 9cdd5cb9454ebc2d960d0c0f53bac8a576cab329 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Fri, 21 Jun 2002 12:53:03 +0000
Subject: [PATCH 1/1] [project @ 2002-06-21 12:53:03 by simonmar] bugfix

---
 ghc/compiler/count_lines |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/count_lines b/ghc/compiler/count_lines
index 3ede63d..8c7905c 100644
--- a/ghc/compiler/count_lines
+++ b/ghc/compiler/count_lines
@@ -38,7 +38,7 @@ foreach $f ( @ARGV ) {
     } else {
 	print STDERR "not counted in a directory: $f\n";
 	$ModCount{$f} += $cnt;
-	$ModComments{$mod} += $comments;
+	$ModComments{$f} += $comments;
     }
 }
 
-- 
1.7.10.4