git.iko.soy/servant
on master help sign in
Fix doctests for Link/QueryParam
8232824Alp Mestanogullari
servant/src/Servant/Utils/Links.hs+1−1
compare with master
unifiedsplit
@@ -49,7 +49,7 @@
49-- or without those:
49-- or without those:
50--
50--
51-- >>> let with = Proxy :: Proxy ("bye" :> QueryParam "name" String :> Delete '[JSON] ())
51-- >>> let with = Proxy :: Proxy ("bye" :> QueryParam "name" String :> Delete '[JSON] ())
52−-- >>> print $ safeLink api with "Hubert"
52+-- >>> print $ safeLink api with (Just "Hubert")
53-- bye?name=Hubert
53-- bye?name=Hubert
54--
54--
55-- >>> let without = Proxy :: Proxy ("bye" :> Delete '[JSON] ())
55-- >>> let without = Proxy :: Proxy ("bye" :> Delete '[JSON] ())