servant-examples 0.4.2 → 0.4.3

raw patch · 2 files changed

+8/−8 lines, 2 filesnew-uploader

Files

• servant-examples.cabal +1/−1
• tutorial/T4.hs +7/−7

@@ -1,5 +1,5 @@ name:                servant-examples-version:             0.4.2+version:             0.4.3 synopsis:            Example programs for servant description:         Example programs for servant,                      showcasing solutions to common needs.

@@ -25,11 +25,11 @@  -- HTML serialization of a single person instance ToHtml Person where-  toHtml p =+  toHtml person =     tr_ $ do-      td_ (toHtml $ firstName p)-      td_ (toHtml $ lastName p)-      td_ (toHtml . show $ age p)+      td_ (toHtml $ firstName person)+      td_ (toHtml $ lastName person)+      td_ (toHtml . show $ age person)    toHtmlRaw = toHtml @@ -37,9 +37,9 @@ instance ToHtml [Person] where   toHtml persons = table_ $ do     tr_ $ do-      td_ "first name"-      td_ "last name"-      td_ "age"+      th_ "first name"+      th_ "last name"+      th_ "age"      foldMap toHtml persons