We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 6e26229 commit 5ea79fbCopy full SHA for 5ea79fb
src/Routing/Parser.purs
@@ -29,7 +29,7 @@ parseQueryPart decoder =
29
-- | applied to every hash part (usually `decodeURIComponent`)
30
parse :: (String -> String) -> String -> Route
31
parse decoder hash =
32
- case flip S.splitAt hash =<< S.indexOf (S.Pattern "?") hash of
+ case flip S.splitAt hash <$> S.indexOf (S.Pattern "?") hash of
33
Just { before, after } ->
34
pathParts before
35
<> map Query (L.fromFoldable (parseQueryPart decoder (S.drop 1 after)))
0 commit comments