diff --git a/src/Main.hs b/src/Main.hs
index f4bd0cd..59a2403 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -109,7 +109,7 @@ vote pollId ballot = do
   db <- Rd.asks db
   liftIO $ Ac.update db (DB.PostBallot pollId ballot')
   pure $ with div_ [id_ "resultLink"] $ do
-    "success! Here's the "
+    "success! Here are the "
     with a_ [href_ (toPollIdLink pollId `T.append` "/results")] "results"
   where
     ballot' = B.Ballot . filter (not . T.null) . B.options $ ballot