@@ -16,14 +16,13 @@ module Language.PureScript.Sugar.Names (
16 desugarImports
16 desugarImports
19−import Data.Maybe (fromMaybe, isJust, fromJust)
19+import Data.Maybe (fromMaybe)
20−import Data.List (intersect, intercalate, (\\))
21import Data.Data
20import Data.Data
22import Data.Generics (extM, mkM, everywhereM)
21import Data.Generics (extM, mkM, everywhereM)
23import Data.Generics.Extras (mkS, extS, everywhereWithContextM')
22import Data.Generics.Extras (mkS, extS, everywhereWithContextM')
25import Control.Applicative (Applicative(..), (<$>), (<*>))
24import Control.Applicative (Applicative(..), (<$>), (<*>))
26−import Control.Monad (forM_, unless, foldM)
25+import Control.Monad (foldM)
27import Control.Monad.Error
26import Control.Monad.Error
29import qualified Data.Map as M
28import qualified Data.Map as M