From 9716f77d14ef43f96a1534d97bb9d336df1882be Mon Sep 17 00:00:00 2001
From: Joris
Date: Mon, 13 Jun 2016 18:21:19 +0200
Subject: Use simple-form for search and set style

---
 src/client/elm/LoggedIn/Home/Update.elm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

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

diff --git a/src/client/elm/LoggedIn/Home/Update.elm b/src/client/elm/LoggedIn/Home/Update.elm
index 3b62abf..302509f 100644
--- a/src/client/elm/LoggedIn/Home/Update.elm
+++ b/src/client/elm/LoggedIn/Home/Update.elm
@@ -2,6 +2,8 @@ module LoggedIn.Home.Update exposing
   ( update
   )
 
+import Form exposing (Form)
+
 import LoggedData exposing (LoggedData)
 
 import LoggedIn.Home.Msg as HomeMsg
@@ -40,9 +42,9 @@ update loggedData action homeModel =
       , Cmd.none
       )
 
-    HomeMsg.UpdateSearch search ->
+    HomeMsg.SearchMsg formMsg ->
       ( { homeModel
-        | search = search
+        | search = Form.update formMsg homeModel.search
         , currentPage = 1
         }
       , Cmd.none
-- 
cgit v1.2.3