@@ -11,9 +11,9 @@ nearby to check out the functions we use.
1111> import Data.Char (isPunctuation, isSpace)
1212> import Data.Monoid (mappend)
1313> import Data.Text (Text)
14−> import Control.Exception (finally)
14+> import Control.Exception (finally)
1515> import Control.Monad (forM_, forever)
16−> import Control.Concurrent (MVar, newMVar, modifyMVar_, readMVar, forkIO, modifyMVar)
16+> import Control.Concurrent (MVar, newMVar, modifyMVar_, readMVar, modifyMVar)
1717> import Control.Monad.IO.Class (liftIO)
1818> import qualified Data.Text as T
1919> import qualified Data.Text.IO as T