From: Pepe Iborra <mnislaih@gmail.com>
Date: Fri, 23 Feb 2007 10:29:57 +0000 (+0000)
Subject: Wibble
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=728cfb0158aa4f0a663ee2e613f6874ffd240d72

Wibble
---

diff --git a/compiler/deSugar/DsBinds.lhs b/compiler/deSugar/DsBinds.lhs
index 4590e8b..d974c05 100644
--- a/compiler/deSugar/DsBinds.lhs
+++ b/compiler/deSugar/DsBinds.lhs
@@ -65,7 +65,7 @@ import Data.List
 dsTopLHsBinds :: AutoScc -> LHsBinds Id -> DsM [(Id,CoreExpr)]
 dsTopLHsBinds auto_scc binds = do
   mb_mod_name_ref <- getModNameRefDs
-  debugging <- debug_enabled
+  debugging <- breakpoints_enabled
   case mb_mod_name_ref of 
     Nothing | debugging -> do  -- Inject a CAF with the module name as literal
       mod <- getModuleDs