From 1f7a21ac55ad5769632c9d5e590e4e87f4d4f76a Mon Sep 17 00:00:00 2001 From: simonpj Date: Mon, 27 Oct 2003 14:06:06 +0000 Subject: [PATCH] [project @ 2003-10-27 14:06:06 by simonpj] Always qualify in defaultErrStyle --- ghc/compiler/utils/Outputable.lhs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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 -- 1.7.10.4