Use Mouse.position json decoder for click event

mwunsch · Oct 5, 2016 · 9ab7bb5 · 9ab7bb5
1 parent 808052c
commit 9ab7bb5
Showing 1 changed file with 1 addition and 4 deletions.
diff --git a/src/Main.elm b/src/Main.elm
@@ -132,10 +132,7 @@ subscriptions game =
 onClickWithCoords : (Mouse.Position -> msg) -> Html.Attribute msg
 onClickWithCoords message =
     on "click" <|
-        Json.map message <|
-            Json.object2 Mouse.Position
-                ("clientX" := Json.int)
-                ("clientY" := Json.int)
+        Json.map message Mouse.position
 
 
 view : GameState -> Html Msg