to-do, avocados

mzero · Feb 13, 2011 · 5004471 · 5004471
1 parent 39a3a45
commit 5004471
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/seed/Chapter3/Step_3_2.hs b/seed/Chapter3/Step_3_2.hs
@@ -5,7 +5,7 @@ import Text.Html
 page = thehtml <<
     [ header << (thetitle << "Output")
     , body <<
-        [ h1 << "A to do list:"
+        [ h1 << "A to-do list:"
         , thediv << toDoHtml
         ]
     ]
@@ -15,7 +15,7 @@ page = thehtml <<
 
 toDoItems :: [(Bool, String)] -- a list of tuples: each a Bool and String
 toDoItems =
-    [ (True,  "Pick up avacados")
+    [ (True,  "Pick up avocados")
     , (True,  "Make snacks")
     , (False, "Clean house")
     , (False, "Have party")