@@ -66,7 +66,7 @@ mapRight f eith = case eith of
6666
6767fileRange :: H.Status -> H.ResponseHeaders -> FilePath
6868 -> Maybe FilePart -> Maybe HeaderValue
69− -> IO (Either SomeException
69+ -> IO (Either IOException
7070 (H.Status, H.ResponseHeaders, Integer, Integer))
7171fileRange s0 hs0 path mPart mRange =
7272 mapRight (fileRangeSized . fromIntegral . P.fileSize) <$>