[project @ 1997-06-05 20:30:35 by sof]

wibble

diff --git a/ghc/compiler/rename/Rename.lhs b/ghc/compiler/rename/Rename.lhs
index 3d32bef..28afe6e 100644 (file)
--- a/ghc/compiler/rename/Rename.lhs
+++ b/ghc/compiler/rename/Rename.lhs
@@ -121,7 +121,7 @@ renameModule us this_mod@(HsModule mod_name vers exports imports fixities local_
     
        -- RETURN THE RENAMED MODULE
     let
-       import_mods = [mod | ImportDecl mod _ _ _ _ <- imports]
+       import_mods = [mod | ImportDecl mod _ _ _ _ _ <- imports]
 
        renamed_module = HsModule mod_name vers 
                                  trashed_exports trashed_imports trashed_fixities