From 70720548c9af024dbb6080638ac8e5470c2213eb Mon Sep 17 00:00:00 2001
From: Joris
Date: Sat, 25 Jun 2016 15:10:03 +0200
Subject: Use the search to view either punctual or monthly payments

---
 src/client/elm/Update.elm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

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

diff --git a/src/client/elm/Update.elm b/src/client/elm/Update.elm
index d3e82de..23e0789 100644
--- a/src/client/elm/Update.elm
+++ b/src/client/elm/Update.elm
@@ -26,6 +26,7 @@ import SignIn.Msg as SignInMsg
 import SignIn.Update as SignInUpdate
 
 import Dialog
+import Dialog.Update as DialogUpdate
 
 import Utils.Http exposing (errorKey)
 
@@ -68,7 +69,7 @@ update msg model =
       )
 
     Dialog dialogMsg ->
-      let (newDialog, command) = Dialog.update dialogMsg model.view model.dialog
+      let (newDialog, command) = Dialog.update DialogUpdate.update dialogMsg model.dialog.model model.dialog
       in  ( { model | dialog = newDialog }
           , command
           )
@@ -94,7 +95,7 @@ applyLoggedIn model loggedInMsg =
 
 urlUpdate : Result String Page -> Model -> (Model, Cmd Msg)
 urlUpdate result model =
-  case Debug.log "urlUpdate" result of
+  case result of
     Err _ ->
       (model, Navigation.modifyUrl (Page.toHash model.page))
     Ok page ->
-- 
cgit v1.2.3