Hide date from monthly payments

1 files changed, 2 insertions, 0 deletions

diff --git a/common/src/Common/Model/PaymentPage.hs b/common/src/Common/Model/PaymentPage.hs
index 3b18bb6..94203a2 100644
--- a/common/src/Common/Model/PaymentPage.hs
+++ b/common/src/Common/Model/PaymentPage.hs
@@ -5,11 +5,13 @@ module Common.Model.PaymentPage
 import           Data.Aeson                 (FromJSON, ToJSON)
 import           GHC.Generics               (Generic)
 
+import           Common.Model.Frequency     (Frequency)
 import           Common.Model.Payment       (Payment)
 import           Common.Model.PaymentHeader (PaymentHeader)
 
 data PaymentPage = PaymentPage
   { _paymentPage_page       :: Int
+  , _paymentPage_frequency  :: Frequency
   , _paymentPage_header     :: PaymentHeader
   , _paymentPage_payments   :: [Payment]
   , _paymentPage_totalCount :: Int