@@ -10,10 +10,9 @@
1010module Servant.Server.Internal.RoutingApplication where
1111
1212import Control.Exception (finally)
13−import Control.Monad (ap, liftM, (>=>))
13+import Control.Monad (ap, liftM)
1414import Control.Monad.Trans (MonadIO(..))
15−import Control.Monad.Trans.Except (runExceptT)
16−import Data.IORef (newIORef, readIORef, writeIORef, IORef, atomicModifyIORef)
15+import Data.IORef (newIORef, readIORef, IORef, atomicModifyIORef)
1716import Network.Wai (Application, Request,
1817 Response, ResponseReceived)
1918import Prelude ()