darcs-all: allow relative path for repo in local fs

[ghc-hetmet.git] / compiler / utils / ListSetOps.lhs

diff --git a/compiler/utils/ListSetOps.lhs b/compiler/utils/ListSetOps.lhs
index 0295072..29f4bb1 100644 (file)
--- a/compiler/utils/ListSetOps.lhs
+++ b/compiler/utils/ListSetOps.lhs
@@ -1,4 +1,5 @@
 %
+% (c) The University of Glasgow 2006
 % (c) The GRASP/AQUA Project, Glasgow University, 1992-1998
 %
 \section[ListSetOps]{Set-like operations on lists}
@@ -23,8 +24,9 @@ module ListSetOps (
 import Outputable
 import Unique  ( Unique )
 import UniqFM  ( eltsUFM, emptyUFM, addToUFM_C )
-import Util    ( isn'tIn, isIn, mapAccumR, sortLe )
-import List    ( partition )
+import Util    ( isn'tIn, isIn, sortLe )
+
+import Data.List
 \end{code}