diff --git a/servant-examples.cabal b/servant-examples.cabal
--- a/servant-examples.cabal
+++ b/servant-examples.cabal
@@ -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.
diff --git a/tutorial/T4.hs b/tutorial/T4.hs
--- a/tutorial/T4.hs
+++ b/tutorial/T4.hs
@@ -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
 
