diff options
| author | Vincent Ambo <v.ambo@me.com> | 2012-04-22T19·57+0200 |
|---|---|---|
| committer | Vincent Ambo <v.ambo@me.com> | 2012-04-22T19·57+0200 |
| commit | 04eb6244978770138b0b624de32a8304087d911e (patch) | |
| tree | 3484f14f5d79f84892ce81d10a559e55e71259b8 /src/Blog.hs | |
| parent | 04d549b817f9de60052b802b6a40520b38511b2e (diff) | |
* removed captchas (well, commented them out)
Diffstat (limited to 'src/Blog.hs')
| -rw-r--r-- | src/Blog.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Blog.hs b/src/Blog.hs index 7f6891cf6e7d..d7a53e1f4225 100644 --- a/src/Blog.hs +++ b/src/Blog.hs @@ -140,7 +140,7 @@ renderCommentBox cLang cId = do H.p $ H.input ! A.name "cname" ! A.placeholder "Name" ! A.class_ "cInput" H.p $ H.label $ H.textarea ! A.name "ctext" ! A.cols "50" ! A.rows "13" ! A.class_ "cInput" ! A.placeholder (toValue $ cTextPlaceholder cLang) $ mempty - H.p $ H.label $ captcha + -- H.p $ H.label $ captcha H.p $ H.input ! A.class_ "cInput" ! A.style "width: 120px;" ! A.type_ "submit" ! A.value (toValue $ cSend cLang) renderComments :: [Comment] -> BlogLang -> Html |