From d8919c2c2d050ddda505fe1f7b78d86f7d33b92a Mon Sep 17 00:00:00 2001
From: rkaminsk <rkaminsk@users.noreply.github.com>
Date: Sun, 9 Apr 2017 02:44:39 +0200
Subject: [PATCH] remove value attribute from password field (#1374)

remove value attribute from password field

Fixes https://github.com/yesodweb/yesod/issues/1373
---
 yesod-form/Yesod/Form/Fields.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/yesod-form/Yesod/Form/Fields.hs b/yesod-form/Yesod/Form/Fields.hs
index 7bdeb516..8833b2fc 100644
--- a/yesod-form/Yesod/Form/Fields.hs
+++ b/yesod-form/Yesod/Form/Fields.hs
@@ -267,9 +267,9 @@ $newline never
 passwordField :: Monad m => RenderMessage (HandlerSite m) FormMessage => Field m Text
 passwordField = Field
     { fieldParse = parseHelper $ Right
-    , fieldView = \theId name attrs val isReq -> toWidget [hamlet|
+    , fieldView = \theId name attrs _ isReq -> toWidget [hamlet|
 $newline never
-<input id="#{theId}" name="#{name}" *{attrs} type="password" :isReq:required="" value="#{either id id val}">
+<input id="#{theId}" name="#{name}" *{attrs} type="password" :isReq:required="">
 |]
     , fieldEnctype = UrlEncoded
     }