diff --git a/ghc/compiler/profiling/SCCfinal.lhs b/ghc/compiler/profiling/SCCfinal.lhs
index dbf31b0db563f8e97d0bac8b6ddf4ebff3a2afc3..9995b92fd891304376c857ec9cbd2dcb019403c2 100644
--- a/ghc/compiler/profiling/SCCfinal.lhs
+++ b/ghc/compiler/profiling/SCCfinal.lhs
@@ -36,13 +36,12 @@ import CmdLineOpts	( opt_AutoSccsOnIndividualCafs,
 			)
 import CostCentre	-- lots of things
 import Id		( idType, mkSysLocal, emptyIdSet, SYN_IE(Id) )
-import Maybes		( maybeToBool )
 import SrcLoc		( noSrcLoc )
 import Type		( splitSigmaTy, getFunTy_maybe )
 import UniqSupply	( getUnique, splitUniqSupply, UniqSupply )
 import Unique           ( Unique )
 import Util		( removeDups, assertPanic )
-import Outputable	-- ToDo: rm
+import Outputable	
 
 infixr 9 `thenMM`, `thenMM_`
 \end{code}