Removed unneeded emptyEnum
commitff02c8f951d5f10e57872bb7d928f47c0f9860e8
authorMichael Snoyman <michael@snoyman.com>
dateTue 13 Jul 2010, 00:04 (16 years ago)
parentad63f02
Network/Wai/Middleware/CleanPath.hs−3
@@ -26,9 +26,6 @@ cleanPathRel prefix app env =
2626cleanPath :: ([String] -> Request -> IO Response) -> Request -> IO Response
2727cleanPath = cleanPathRel B.empty
2828
29−emptyEnum :: Enumerator
30−emptyEnum = Enumerator $ \_ -> return . Right
31−
3229-- | Given a certain requested path, return either a corrected path
3330-- to redirect to or the tokenized path.
3431--