summaryrefslogtreecommitdiff
path: root/src/Lib.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Lib.hs')
-rw-r--r--src/Lib.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Lib.hs b/src/Lib.hs
index 67e6579..3cf2671 100644
--- a/src/Lib.hs
+++ b/src/Lib.hs
@@ -374,7 +374,7 @@ instance ToHtml HomeView where
span_ $ toHtml label <> ". "
if disabled
then span_ "Coming soon."
- else span_ $ toHtmlRaw description
+ else span_ $ em_ $ toHtmlRaw description
br_ []
div_ $ do
legend_ "Periods"
@@ -405,12 +405,12 @@ instance ToHtml HomeView where
input_ [type_ "radio", name_ "l", value_ "Short", id_ "Short", checked_]
label_ [for_ "Short"] $ do
span_ $ "Short "
- span_ "(6 works, less than 11 questions)"
+ span_ "(6 works, fewer than 11 questions)"
div_ $ do
input_ [type_ "radio", name_ "l", value_ "Long", id_ "Long"]
label_ [for_ "Long"] $ do
span_ $ "Long "
- span_ "(10 works, less than 25 questions)"
+ span_ "(10 works, fewer than 25 questions)"
br_ []
button_ [type_ "submit"] "Start"
toHtmlRaw = toHtml