diff --git a/yesod-form/Yesod/Form/Fields.hs b/yesod-form/Yesod/Form/Fields.hs
index e9416de0..167b9b9d 100644
--- a/yesod-form/Yesod/Form/Fields.hs
+++ b/yesod-form/Yesod/Form/Fields.hs
@@ -173,7 +173,7 @@ htmlField = Field
     }
   where showVal = either id (pack . renderHtml)
 
--- | A newtype wrapper around a 'String' that converts newlines to HTML
+-- | A newtype wrapper around a 'Text' that converts newlines to HTML
 -- br-tags.
 newtype Textarea = Textarea { unTextarea :: Text }
     deriving (Show, Read, Eq, PersistField)