diff options
author | Joris | 2019-10-22 21:35:03 +0200 |
---|---|---|
committer | Joris | 2019-10-22 21:35:03 +0200 |
commit | 80f09e8b3a5c856e60922a73c9161a8c5392e4d4 (patch) | |
tree | 6e2d48d3250272f9021a465eb0fa5276e84695e6 /client/src/View/Payment/Edit.hs | |
parent | 33e78f2ebbf5bf7b40e7aa732cc7c019f6df3f12 (diff) |
Create ModalForm component
Diffstat (limited to 'client/src/View/Payment/Edit.hs')
-rw-r--r-- | client/src/View/Payment/Edit.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/client/src/View/Payment/Edit.hs b/client/src/View/Payment/Edit.hs index 0361602..77841ce 100644 --- a/client/src/View/Payment/Edit.hs +++ b/client/src/View/Payment/Edit.hs @@ -14,6 +14,7 @@ import Common.Model (Category (..), CategoryId, SavedPayment (..)) import qualified Common.Msg as Msg import qualified Component.Modal as Modal +import qualified Util.Ajax as Ajax import qualified Util.Reflex as ReflexUtil import qualified View.Payment.Form as Form @@ -43,7 +44,7 @@ view input cancel = do , Form._input_category = category , Form._input_frequency = _payment_frequency payment , Form._input_mkPayload = EditPaymentForm (_payment_id payment) - , Form._input_httpMethod = Form.Put + , Form._input_ajax = Ajax.put } hide <- ReflexUtil.flatten (Form._output_hide <$> formOutput) |