-- Note that the returned path components are URI-decoded.
getPathInfo ∷ Rsrc [Strict.ByteString]
getPathInfo = do rsrcPath ← getResourcePath
- reqPath ← splitPathInfo <$> getRequestURI
+ reqPath ← uriPathSegments <$> getRequestURI
return $ drop (length rsrcPath) reqPath
-- |Assume the query part of request URI as