Merge pull request #694 from snakamura/extra-backslash

Remove an extra backslash
This commit is contained in:
Michael Snoyman 2014-03-17 13:52:26 +02:00
commit 0f987e4876

View File

@ -334,7 +334,7 @@ searchField :: Monad m => RenderMessage (HandlerSite m) FormMessage => AutoFocus
searchField autoFocus = Field
{ fieldParse = parseHelper Right
, fieldView = \theId name attrs val isReq -> do
[whamlet|\
[whamlet|
$newline never
<input id="#{theId}" name="#{name}" *{attrs} type="search" :isReq:required="" :autoFocus:autofocus="" value="#{either id id val}">
|]