diff --git a/yesod-form/ChangeLog.md b/yesod-form/ChangeLog.md
index 1251b945..af0f887b 100644
--- a/yesod-form/ChangeLog.md
+++ b/yesod-form/ChangeLog.md
@@ -1,3 +1,7 @@
+## 1.6.3
+
+* Changed `Textarea` to derive `IsString` [#1514](https://github.com/yesodweb/yesod/pull/1514)
+
## 1.6.2
* Move `addClass` from private/undocumented in `Yesod.Form.Bootstrap3` to `Yesod.Form.Functions` [#1510](https://github.com/yesodweb/yesod/pull/1510)
diff --git a/yesod-form/Yesod/Form/Fields.hs b/yesod-form/Yesod/Form/Fields.hs
index a79d75cb..d64776ff 100644
--- a/yesod-form/Yesod/Form/Fields.hs
+++ b/yesod-form/Yesod/Form/Fields.hs
@@ -106,6 +106,8 @@ import Data.Attoparsec.Text (Parser, char, string, digit, skipSpace, endOfInput,
import Yesod.Persist.Core
+import Data.String (IsString)
+
#if !MIN_VERSION_base(4,8,0)
import Data.Monoid
#endif
@@ -217,7 +219,7 @@ $newline never
-- If this text is then placed verbatim into HTML, the lines won't be separated, thus the need for replacing with @\
@ tags).
-- If you don't need this functionality, simply use 'unTextarea' to access the raw text.
newtype Textarea = Textarea { unTextarea :: Text }
- deriving (Show, Read, Eq, PersistField, Ord, ToJSON, FromJSON)
+ deriving (Show, Read, Eq, PersistField, Ord, ToJSON, FromJSON, IsString)
instance PersistFieldSql Textarea where
sqlType _ = SqlString
instance ToHtml Textarea where
diff --git a/yesod-form/yesod-form.cabal b/yesod-form/yesod-form.cabal
index f3e2fa51..d6953929 100644
--- a/yesod-form/yesod-form.cabal
+++ b/yesod-form/yesod-form.cabal
@@ -1,5 +1,5 @@
name: yesod-form
-version: 1.6.2
+version: 1.6.3
license: MIT
license-file: LICENSE
author: Michael Snoyman