diff options
Diffstat (limited to '')
-rw-r--r-- | lib/Persist.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/Persist.hs b/lib/Persist.hs index f42c1cc..c9c7901 100644 --- a/lib/Persist.hs +++ b/lib/Persist.hs @@ -46,7 +46,6 @@ import Data.Time.Calendar (Day, DayOfWeek (..)) import Data.Vector (Vector) import Database.Persist.Postgresql (SqlBackend) import GHC.Generics (Generic) -import Lucid.Forms (ToHtmlFormInput) import Web.PathPieces (PathPiece) newtype Token = Token UUID @@ -60,7 +59,7 @@ instance ToParamSchema Token where toParamSchema _ = toParamSchema (Proxy @String) data AmendmentStatus = Cancelled | Added - deriving (ToJSON, FromJSON, Generic, Show, Read, Eq, ToHtmlFormInput) + deriving (ToJSON, FromJSON, Generic, Show, Read, Eq) derivePersistField "AmendmentStatus" instance FromHttpApiData AmendmentStatus where parseUrlPiece "Cancelled" = Right Cancelled |