diff options
| author | Joris | 2018-11-01 13:14:25 +0100 |
|---|---|---|
| committer | Joris | 2019-08-04 21:14:32 +0200 |
| commit | 2741f47ef7b87255203bc2f7f7b2b9140c70b8f0 (patch) | |
| tree | ea5f685cdf8f3de2efa1113325d45faaa90c977e /client/src/View/Payment.hs | |
| parent | 86957359ecf54c205aee1c09e151172c327e987a (diff) | |
| download | budget-2741f47ef7b87255203bc2f7f7b2b9140c70b8f0.tar.gz budget-2741f47ef7b87255203bc2f7f7b2b9140c70b8f0.tar.bz2 budget-2741f47ef7b87255203bc2f7f7b2b9140c70b8f0.zip | |
Implementing client side validation
Diffstat (limited to 'client/src/View/Payment.hs')
| -rw-r--r-- | client/src/View/Payment.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/client/src/View/Payment.hs b/client/src/View/Payment.hs index 5245e72..007471d 100644 --- a/client/src/View/Payment.hs +++ b/client/src/View/Payment.hs @@ -30,7 +30,7 @@ data PaymentOut = PaymentOut widget :: forall t m. MonadWidget t m => PaymentIn -> m PaymentOut widget paymentIn = do - R.divClass "payment" $ do + R.elClass "main" "payment" $ do rec let init = _paymentIn_init paymentIn paymentsPerPage = 7 |