From 9ec84e3a20c767f6525639f58cd22715e302b88d Mon Sep 17 00:00:00 2001 From: Joris Date: Sun, 26 Jun 2016 12:31:24 +0200 Subject: Add an editable date field for punctual payment creation --- src/server/Model/Json/AddIncome.hs | 17 ----------------- 1 file changed, 17 deletions(-) delete mode 100644 src/server/Model/Json/AddIncome.hs (limited to 'src/server/Model/Json/AddIncome.hs') diff --git a/src/server/Model/Json/AddIncome.hs b/src/server/Model/Json/AddIncome.hs deleted file mode 100644 index 6570ba9..0000000 --- a/src/server/Model/Json/AddIncome.hs +++ /dev/null @@ -1,17 +0,0 @@ -{-# LANGUAGE DeriveGeneric #-} - -module Model.Json.AddIncome - ( AddIncome(..) - ) where - -import GHC.Generics - -import Data.Aeson -import Data.Time.Calendar (Day) - -data AddIncome = AddIncome - { day :: Day - , amount :: Int - } deriving (Show, Generic) - -instance FromJSON AddIncome -- cgit v1.2.3