Fix for GHC 6.12

This commit is contained in:
Michael Snoyman 2011-09-13 21:09:44 +03:00
parent f72a2e7c14
commit ac74e83e4b
2 changed files with 3 additions and 3 deletions

View File

@ -419,7 +419,7 @@ fileAFormReq fs = AForm $ \(master, langs) menvs ints -> do
{ fvLabel = toHtml $ renderMessage master langs $ fsLabel fs
, fvTooltip = fmap (toHtml . renderMessage master langs) $ fsTooltip fs
, fvId = id'
, fvInput = [whamlet|
, fvInput = [WHAMLET|
<input type=file name=#{name} ##{id'}>
|]
, fvErrors = errs
@ -448,7 +448,7 @@ fileAFormOpt fs = AForm $ \(master, langs) menvs ints -> do
{ fvLabel = toHtml $ renderMessage master langs $ fsLabel fs
, fvTooltip = fmap (toHtml . renderMessage master langs) $ fsTooltip fs
, fvId = id'
, fvInput = [whamlet|
, fvInput = [WHAMLET|
<input type=file name=#{name} ##{id'}>
|]
, fvErrors = errs

View File

@ -1,5 +1,5 @@
name: yesod-form
version: 0.3.2
version: 0.3.2.1
license: BSD3
license-file: LICENSE
author: Michael Snoyman <michael@snoyman.com>