Now get Producer' and Consumer' from the Pipes module

Gabriella439 · Aug 30, 2013 · bfe711b · bfe711b
1 parent f316d89
commit bfe711b
Showing 1 changed file with 1 addition and 3 deletions.
diff --git a/src/Pipes/Concurrent.hs b/src/Pipes/Concurrent.hs
@@ -56,9 +56,7 @@ import Control.Monad (when)
 import Data.IORef (newIORef, readIORef, mkWeakIORef)
 import Data.Monoid (Monoid(mempty, mappend))
 import GHC.Conc.Sync (unsafeIOToSTM)
-import Pipes (lift, yield, await)
-import Pipes.Core (Producer', Consumer')
-import qualified Pipes.Core as P
+import Pipes (lift, yield, await, Producer', Consumer')
 import System.Mem (performGC)
 
 {-| Spawn a mailbox that has an 'Input' and 'Output' end, using the specified