Permalink
Browse files

fix typos: to-do, avocados, invitees

  • Loading branch information...
1 parent 7a63dd7 commit 22c1536879a3f2dd0580701c2090c6b0e707ec5f @juhp juhp committed Feb 13, 2011
Showing with 3 additions and 3 deletions.
  1. +3 −3 seed/Chapter3/Step_3_7.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
, reminderHtml
, h1 << "# people invited:"
@@ -17,7 +17,7 @@ data ToDo = ToDo String | Done String
toDoItems :: [ToDo]
toDoItems =
- [ Done "Pick up avacados"
+ [ Done "Pick up avocados"
, Done "Make snacks"
, ToDo "Clean house"
, ToDo "Have party"
@@ -63,7 +63,7 @@ toDoHtml = ulist << renderToDo toDoItems
-- NEXT
-- Add an optional partner or spouse to the invite data type.
--- Add a list of invitiees (and optional partners!) to the page.
+-- Add a list of invitees (and optional partners!) to the page.
data Invite = Invite String Int

0 comments on commit 22c1536

Please sign in to comment.