From 3e752487e4b20c6a7521587b948aa94c399b99a5 Mon Sep 17 00:00:00 2001
From: Eike Kettner <eike.kettner@posteo.de>
Date: Thu, 22 Oct 2020 23:33:46 +0200
Subject: [PATCH] Remove unused argument

---
 modules/webapp/src/main/elm/App/View.elm       | 11 +----------
 modules/webapp/src/main/elm/Page/Home/View.elm |  4 ++--
 2 files changed, 3 insertions(+), 12 deletions(-)

diff --git a/modules/webapp/src/main/elm/App/View.elm b/modules/webapp/src/main/elm/App/View.elm
index 2223a342..fd14c87a 100644
--- a/modules/webapp/src/main/elm/App/View.elm
+++ b/modules/webapp/src/main/elm/App/View.elm
@@ -178,16 +178,7 @@ viewLogin model =
 
 viewHome : Model -> Html Msg
 viewHome model =
-    let
-        mid =
-            case model.page of
-                HomePage ->
-                    Util.Maybe.fromString model.itemDetailModel.detail.item.id
-
-                _ ->
-                    Nothing
-    in
-    Html.map HomeMsg (Page.Home.View.view mid model.flags model.uiSettings model.homeModel)
+    Html.map HomeMsg (Page.Home.View.view model.flags model.uiSettings model.homeModel)
 
 
 menuEntry : Model -> Page -> List (Html Msg) -> Html Msg
diff --git a/modules/webapp/src/main/elm/Page/Home/View.elm b/modules/webapp/src/main/elm/Page/Home/View.elm
index 32653c43..ce4d8969 100644
--- a/modules/webapp/src/main/elm/Page/Home/View.elm
+++ b/modules/webapp/src/main/elm/Page/Home/View.elm
@@ -14,8 +14,8 @@ import Page.Home.Data exposing (..)
 import Util.Html
 
 
-view : Maybe String -> Flags -> UiSettings -> Model -> Html Msg
-view current flags settings model =
+view : Flags -> UiSettings -> Model -> Html Msg
+view flags settings model =
     div [ class "home-page ui padded grid" ]
         [ div
             [ classList