diff options
| author | Joris | 2018-10-28 17:57:58 +0100 |
|---|---|---|
| committer | Joris | 2018-10-28 17:57:58 +0100 |
| commit | 40b4994797a797b1fa86cafda789a5c488730c6d (patch) | |
| tree | ad195b31fa442821b9de8f99364e254f0f41935f /client/src/Component/Form.hs | |
| parent | df83b634006c699cfa1e921bf74ce951a906a62f (diff) | |
| download | budget-40b4994797a797b1fa86cafda789a5c488730c6d.tar.gz budget-40b4994797a797b1fa86cafda789a5c488730c6d.tar.bz2 budget-40b4994797a797b1fa86cafda789a5c488730c6d.zip | |
Delete payment
Diffstat (limited to 'client/src/Component/Form.hs')
| -rw-r--r-- | client/src/Component/Form.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/client/src/Component/Form.hs b/client/src/Component/Form.hs index 0a89c6e..6ea02fa 100644 --- a/client/src/Component/Form.hs +++ b/client/src/Component/Form.hs @@ -6,7 +6,7 @@ import qualified Data.Map as M import Reflex.Dom (MonadWidget) import qualified Reflex.Dom as R -form :: forall t m a. (MonadWidget t m) => m a -> m a +form :: forall t m a. MonadWidget t m => m a -> m a form content = R.elAttr "form" (M.singleton "onsubmit" "event.preventDefault()") $ content |