X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Ftypecheck%2FTcAnnotations.lhs;h=1d495c0eec36db323822032d896a0274a3be0888;hp=17ebbb13eaba1508856d4d620021f48f59aa91fb;hb=HEAD;hpb=9bcd95bad83ee937c178970e8b729732e680fe1e

diff --git a/compiler/typecheck/TcAnnotations.lhs b/compiler/typecheck/TcAnnotations.lhs
index 17ebbb1..1d495c0 100644
--- a/compiler/typecheck/TcAnnotations.lhs
+++ b/compiler/typecheck/TcAnnotations.lhs
@@ -20,8 +20,6 @@ import TcExpr
 import {-# SOURCE #-} TcSplice ( runAnnotation )
 import FastString
 #endif
-
-import Control.Monad
 \end{code}
 
 \begin{code}
@@ -48,6 +46,6 @@ annProvenanceToTarget mod ModuleAnnProvenance       = ModuleTarget mod
 
 annCtxt :: OutputableBndr id => LAnnDecl id -> SDoc
 annCtxt ann
-  = hang (ptext (sLit "In the annotation:")) 4 (ppr ann)
+  = hang (ptext (sLit "In the annotation:")) 2 (ppr ann)
 #endif
 \end{code}
\ No newline at end of file