From 8e3a7bf1cb83bbb6e3dcd54308eefa52a29cd679 Mon Sep 17 00:00:00 2001
From: Joris
Date: Fri, 3 Jun 2016 20:27:16 +0200
Subject: Migrate to elm 0.17

---
 src/client/elm/View/Click.elm | 24 ------------------------
 1 file changed, 24 deletions(-)
 delete mode 100644 src/client/elm/View/Click.elm

(limited to 'src/client/elm/View/Click.elm')

diff --git a/src/client/elm/View/Click.elm b/src/client/elm/View/Click.elm
deleted file mode 100644
index a722cac..0000000
--- a/src/client/elm/View/Click.elm
+++ /dev/null
@@ -1,24 +0,0 @@
-module View.Click
-  ( clickTo
-  ) where
-
-import Signal
-import Json.Decode as Json
-
-import Html exposing (..)
-import Html.Attributes exposing (..)
-import Html.Events exposing (..)
-
-import TransitRouter
-import Route exposing (Route, toPath)
-
-clickTo : Route -> List Attribute
-clickTo route =
-  let path = toPath route
-  in  [ href path
-      , onWithOptions
-          "click"
-          { stopPropagation = True, preventDefault = True }
-          Json.value
-          (\_ -> Signal.message TransitRouter.pushPathAddress path)
-      ]
-- 
cgit v1.2.3