From b4d3e01afb74e5f76cbf752e6d2732b2c875be19 Mon Sep 17 00:00:00 2001
From: Martin Milata <martin@martinmilata.cz>
Date: Tue, 18 Jun 2019 01:50:32 +0200
Subject: [PATCH] Remove comma from <form> tag

---
 yesod-auth/ChangeLog.md        | 4 ++++
 yesod-auth/Yesod/Auth/Email.hs | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/yesod-auth/ChangeLog.md b/yesod-auth/ChangeLog.md
index fd65b843..11ab2e5b 100644
--- a/yesod-auth/ChangeLog.md
+++ b/yesod-auth/ChangeLog.md
@@ -1,5 +1,9 @@
 # ChangeLog for yesod-auth
 
+## Unreleased
+
+* Email: Fix typo in `defaultEmailLoginHandler` template [#1605](https://github.com/yesodweb/yesod/pull/1605)
+
 ## 1.6.7
 
 * Redirect behavior of `clearCreds` depends on request type [#1598](https://github.com/yesodweb/yesod/pull/1598)
diff --git a/yesod-auth/Yesod/Auth/Email.hs b/yesod-auth/Yesod/Auth/Email.hs
index 77a360fa..bfff182c 100644
--- a/yesod-auth/Yesod/Auth/Email.hs
+++ b/yesod-auth/Yesod/Auth/Email.hs
@@ -420,7 +420,7 @@ defaultEmailLoginHandler toParent = do
         (widget, enctype) <- generateFormPost loginForm
 
         [whamlet|
-            <form method="post" action="@{toParent loginR}", enctype=#{enctype}>
+            <form method="post" action="@{toParent loginR}" enctype=#{enctype}>
                 <div id="emailLoginForm">
                     ^{widget}
                     <div>