From e16ebb295dad25d4889034b8d5087cb9c22c1785 Mon Sep 17 00:00:00 2001
From: simonpj <unknown>
Date: Thu, 30 Oct 2003 09:01:31 +0000
Subject: [PATCH] [project @ 2003-10-30 09:01:31 by simonpj] Tiny code
 simplification (allUses)

---
 ghc/compiler/rename/RnExpr.lhs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/rename/RnExpr.lhs b/ghc/compiler/rename/RnExpr.lhs
index 866b59c..78d8c00 100644
--- a/ghc/compiler/rename/RnExpr.lhs
+++ b/ghc/compiler/rename/RnExpr.lhs
@@ -649,7 +649,7 @@ rnBracket (DecBr group)
     let 
 	dus = tcg_dus tcg_env 
     in
-    returnM (DecBr group', duUses dus `minusNameSet` duDefs dus)
+    returnM (DecBr group', allUses dus)
 \end{code}
 
 %************************************************************************
-- 
1.7.10.4