[project @ 2003-10-27 14:06:06 by simonpj]

Always qualify in defaultErrStyle

diff --git a/ghc/compiler/utils/Outputable.lhs b/ghc/compiler/utils/Outputable.lhs
index dcfe8c2..e119417 100644 (file)
--- a/ghc/compiler/utils/Outputable.lhs
+++ b/ghc/compiler/utils/Outputable.lhs
@@ -113,7 +113,7 @@ defaultErrStyle :: PprStyle
 -- Only used for desugarer warnings, and typechecker errors in interface sigs
 defaultErrStyle 
   | opt_PprStyle_Debug = mkUserStyle alwaysQualify AllTheWay
-  | otherwise         = mkUserStyle neverQualify  (PartWay opt_PprUserLength)
+  | otherwise         = mkUserStyle alwaysQualify  (PartWay opt_PprUserLength)
 
 mkUserStyle unqual depth |  opt_PprStyle_Debug = PprDebug
                         |  otherwise          = PprUser unqual depth