haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added Ord instance for Textarea

Browse Source
This commit is contained in:
Michael 2012-05-31 07:24:15 +03:00
parent 3a21986165
commit 4929ece70c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
yesod-form/Yesod/Form/Fields.hs
View File

@ -167,7 +167,7 @@ $# FIXME: There was a class="html" attribute, for what purpose?
-- | A newtype wrapper around a 'Text' that converts newlines to HTML -- | A newtype wrapper around a 'Text' that converts newlines to HTML
-- br-tags. -- br-tags.
newtype Textarea = Textarea { unTextarea :: Text } newtype Textarea = Textarea { unTextarea :: Text }
deriving (Show, Read, Eq, PersistField) deriving (Show, Read, Eq, PersistField, Ord)
instance ToHtml Textarea where instance ToHtml Textarea where
toHtml = toHtml =
unsafeByteString unsafeByteString