diff options
author | Joris | 2019-10-09 23:16:00 +0200 |
---|---|---|
committer | Joris | 2019-10-09 23:16:04 +0200 |
commit | 7529a18ff0ac443e7f9764b5e2d0f57a5d3a850b (patch) | |
tree | 3d5cfc1f2318c2d4f889ee70764929f1a96e4c41 /common/src/Common/Model/CreatePayment.hs | |
parent | e5ac82f4808e974dec5f19fc6f059efaa5214022 (diff) | |
download | budget-7529a18ff0ac443e7f9764b5e2d0f57a5d3a850b.tar.gz budget-7529a18ff0ac443e7f9764b5e2d0f57a5d3a850b.tar.bz2 budget-7529a18ff0ac443e7f9764b5e2d0f57a5d3a850b.zip |
Use common payment validation in the backend
Remove deprecated backend validation
Diffstat (limited to 'common/src/Common/Model/CreatePayment.hs')
-rw-r--r-- | common/src/Common/Model/CreatePayment.hs | 34 |
1 files changed, 0 insertions, 34 deletions
diff --git a/common/src/Common/Model/CreatePayment.hs b/common/src/Common/Model/CreatePayment.hs deleted file mode 100644 index c61423c..0000000 --- a/common/src/Common/Model/CreatePayment.hs +++ /dev/null @@ -1,34 +0,0 @@ -module Common.Model.CreatePayment - ( CreatePaymentError(..) - , CreatePayment(..) - ) where - -import Data.Aeson (FromJSON, ToJSON) -import Data.Text (Text) -import Data.Time.Calendar (Day) -import GHC.Generics (Generic) - -import Common.Model.Category (CategoryId) -import Common.Model.Frequency (Frequency) - -data CreatePaymentError = CreatePaymentError - { _createPaymentError_name :: Maybe Text - , _createPaymentError_cost :: Maybe Text - , _createPaymentError_date :: Maybe Text - , _createPaymentError_category :: Maybe Text - , _createPaymentError_frequency :: Maybe Text - } deriving (Show, Generic) - -instance FromJSON CreatePaymentError -instance ToJSON CreatePaymentError - -data CreatePayment = CreatePayment - { _createPayment_name :: Text - , _createPayment_cost :: Int - , _createPayment_date :: Day - , _createPayment_category :: CategoryId - , _createPayment_frequency :: Frequency - } deriving (Show, Generic) - -instance FromJSON CreatePayment -instance ToJSON CreatePayment |