From b5219fe27e7d67359c6a5a169603753ebb740353 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Tue, 7 Jan 2003 16:30:37 +0000
Subject: [PATCH] [project @ 2003-01-07 16:30:37 by simonmar] 80-columnify a
 comment

---
 ghc/compiler/main/Finder.lhs |    7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/ghc/compiler/main/Finder.lhs b/ghc/compiler/main/Finder.lhs
index a16aab1..8054e91 100644
--- a/ghc/compiler/main/Finder.lhs
+++ b/ghc/compiler/main/Finder.lhs
@@ -225,9 +225,10 @@ hiOnlyModLocation path basename hisuf
         return (ModLocation{ ml_hspp_file = Nothing,
  	        	     ml_hs_file   = Nothing,
  	        	     ml_hi_file   = path ++ '/':basename ++ '.':hisuf,
-		 		    -- Remove the .hi-boot suffix from hi_file, if it
-		 		    -- had one.  We always want the name of the real
-		 		    -- .hi file in the ml_hi_file field.
+		 		-- Remove the .hi-boot suffix from
+		 		-- hi_file, if it had one.  We always
+		 		-- want the name of the real .hi file
+		 		-- in the ml_hi_file field.
 	   	             ml_obj_file  = obj_fn
                  })}
 
-- 
1.7.10.4