From cfca18262c1ff48dcb683ddab7d03cf8e55573ff Mon Sep 17 00:00:00 2001
From: Joris
Date: Fri, 24 Mar 2017 09:21:04 +0000
Subject: Features/categories

---
 src/client/elm/Main.elm | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

(limited to 'src/client/elm/Main.elm')

diff --git a/src/client/elm/Main.elm b/src/client/elm/Main.elm
index fa1415d..9674b66 100644
--- a/src/client/elm/Main.elm
+++ b/src/client/elm/Main.elm
@@ -4,20 +4,19 @@ module Main exposing
 
 import Navigation
 import Time
-import Msg
+import Msg exposing (Msg(UpdatePage))
 
 import Model exposing (init)
-import Update exposing (update, urlUpdate)
+import Update exposing (update)
 import View exposing (view)
 import Page
 import Tooltip
 
 main =
-  Navigation.programWithFlags (Navigation.makeParser Page.fromHash)
+  Navigation.programWithFlags (UpdatePage << Page.fromLocation)
     { init = init
     , view = view
     , update = update
-    , urlUpdate = urlUpdate
     , subscriptions = (\model ->
         Sub.batch
           [ Time.every 1000 Msg.UpdateTime
-- 
cgit v1.2.3