diff options
Diffstat (limited to 'src/server/Model/Json')
| -rw-r--r-- | src/server/Model/Json/Payment.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/server/Model/Json/Payment.hs b/src/server/Model/Json/Payment.hs index 8923c13..7f4de15 100644 --- a/src/server/Model/Json/Payment.hs +++ b/src/server/Model/Json/Payment.hs @@ -11,6 +11,7 @@ import Data.Text (Text) import Data.Aeson import Model.Database (PaymentId, UserId) +import Model.Frequency data Payment = Payment { id :: PaymentId @@ -18,6 +19,7 @@ data Payment = Payment , name :: Text , cost :: Int , userId :: UserId + , frequency :: Frequency } deriving (Show, Generic) instance FromJSON Payment |