From: simonpj <unknown>
Date: Mon, 27 Oct 2003 14:06:06 +0000 (+0000)
Subject: [project @ 2003-10-27 14:06:06 by simonpj]
X-Git-Tag: Approx_11550_changesets_converted~323
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=1f7a21ac55ad5769632c9d5e590e4e87f4d4f76a;p=ghc-hetmet.git

[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
--- 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