git.iko.soy/typeable/http-api-data
on master help sign in
Enable ConstraintKinds and fix typo for GHC 7.8
de9fe0fNickolay Kudasov
src/Web/Internal/FormUrlEncoded.hs+2−1
compare with master
unifiedsplit
@@ -1,3 +1,4 @@
1+{-# LANGUAGE ConstraintKinds #-}
1{-# LANGUAGE CPP #-}
2{-# LANGUAGE CPP #-}
2{-# LANGUAGE DataKinds #-}
3{-# LANGUAGE DataKinds #-}
3{-# LANGUAGE DefaultSignatures #-}
4{-# LANGUAGE DefaultSignatures #-}
@@ -75,7 +76,7 @@ import Web.Internal.HttpApiData
75-- >>> instance FromForm Person
76-- >>> instance FromForm Person
76--
77--
77-- >>> data Project = Project { projectName :: String, projectSize :: Int } deriving (Generic, Show)
78-- >>> data Project = Project { projectName :: String, projectSize :: Int } deriving (Generic, Show)
78−-- >>> myOptions = FormOptions { fieldLabelModifier = map toLower . drop (length ("project" :: String)) }
79+-- >>> let myOptions = FormOptions { fieldLabelModifier = map toLower . drop (length ("project" :: String)) }
79-- >>> instance ToForm Project where toForm = genericToForm myOptions
80-- >>> instance ToForm Project where toForm = genericToForm myOptions
80-- >>> instance FromForm Project where fromForm = genericFromForm myOptions
81-- >>> instance FromForm Project where fromForm = genericFromForm myOptions
81
82