git.iko.soy/haskell-servant/servant-elm
on master help sign in
Apply type alterations to captured segments
commitb76a11f8ef1b5faa49b789f27cbf24cce9ea673b authorsandydoo <hey@sandydoo.me> dateFri 10 Feb 2023, 01:17 (4 years ago) parente26ae72
1 file changed+1−1
compare with master
unifiedsplit
src/Servant/Elm/Internal/Generate.hs+1−1
src/Servant/Elm/Internal/Generate.hs+1−1
@@ -563,7 +563,7 @@ mkUrl opts segments =
563563 F.Cap arg ->
564564 let
565565 toStringSrc =
566− toString opts (maybeOf (arg ^. F.argType))
566+ toString opts (elmTypeAlterations opts (maybeOf (arg ^. F.argType)))
567567 in
568568 "Url.percentEncode " <> pipeRight [elmCaptureArg s, toStringSrc]
569569