aboutsummaryrefslogtreecommitdiff
path: root/src/client/View/Events.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/client/View/Events.elm')
-rw-r--r--src/client/View/Events.elm19
1 files changed, 0 insertions, 19 deletions
diff --git a/src/client/View/Events.elm b/src/client/View/Events.elm
deleted file mode 100644
index 1eb9027..0000000
--- a/src/client/View/Events.elm
+++ /dev/null
@@ -1,19 +0,0 @@
-module View.Events
- ( onSubmitPrevDefault
- ) where
-
-import Signal
-import Json.Decode as Json
-import Html exposing (..)
-import Html.Events exposing (..)
-import Html.Attributes exposing (..)
-
-onSubmitPrevDefault : Signal.Address a -> a -> Attribute
-onSubmitPrevDefault address value =
- onWithOptions
- "submit"
- { defaultOptions | preventDefault <- True }
- Json.value
- (\_ ->
- Signal.message address value
- )