[project @ 2004-11-30 10:46:58 by simonmar]

Add space to error message

diff --git a/ghc/compiler/main/Packages.lhs b/ghc/compiler/main/Packages.lhs
index d3a942b..8a317c0 100644 (file)
--- a/ghc/compiler/main/Packages.lhs
+++ b/ghc/compiler/main/Packages.lhs
@@ -382,7 +382,7 @@ overlappingError pkg overlaps
 multiplePackagesErr str ps =
   throwDyn (CmdLineError (showSDoc (
                   text "Error; multiple packages match" <+> 
-                       text str <> colon <>
+                       text str <> colon <+>
                    sep (punctuate comma (map (text.showPackageId.package) ps))
                )))