From 429f78859cc0c7e34502181959cf00e5811294df Mon Sep 17 00:00:00 2001 From: Jonathan Lamothe Date: Fri, 18 Jan 2019 12:48:36 -0500 Subject: [PATCH 1/3] make FormResult an instance od Eq --- yesod-form/Yesod/Form/Types.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/yesod-form/Yesod/Form/Types.hs b/yesod-form/Yesod/Form/Types.hs index 898e319b..bfc3e179 100644 --- a/yesod-form/Yesod/Form/Types.hs +++ b/yesod-form/Yesod/Form/Types.hs @@ -50,7 +50,7 @@ import Data.Foldable data FormResult a = FormMissing | FormFailure [Text] | FormSuccess a - deriving Show + deriving (Show, Eq) instance Functor FormResult where fmap _ FormMissing = FormMissing fmap _ (FormFailure errs) = FormFailure errs From fd141d56b7669197925e7810c43896ada4f813fd Mon Sep 17 00:00:00 2001 From: Jonathan Lamothe Date: Fri, 18 Jan 2019 13:04:34 -0500 Subject: [PATCH 2/3] incremented version number --- yesod-form/yesod-form.cabal | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/yesod-form/yesod-form.cabal b/yesod-form/yesod-form.cabal index e2c1ae5d..817ef8db 100644 --- a/yesod-form/yesod-form.cabal +++ b/yesod-form/yesod-form.cabal @@ -1,5 +1,5 @@ name: yesod-form -version: 1.6.3 +version: 1.6.4 license: MIT license-file: LICENSE author: Michael Snoyman From 92e4e48353786e8a1b51a91ddf8f10716279e9d0 Mon Sep 17 00:00:00 2001 From: Jonathan Lamothe Date: Sat, 19 Jan 2019 13:12:29 -0500 Subject: [PATCH 3/3] updated ChangeLog --- yesod-form/ChangeLog.md | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/yesod-form/ChangeLog.md b/yesod-form/ChangeLog.md index 9b0d32c8..f6d07e92 100644 --- a/yesod-form/ChangeLog.md +++ b/yesod-form/ChangeLog.md @@ -1,5 +1,9 @@ # ChangeLog for yesod-form +## 1.6.4 + +* Make FormResult an instance of Eq + ## 1.6.3 * make sure a select field does not lose the selected value even if a validation on the