From ead2e5225347343d62b5a082e2b9dfe99a9ff2a9 Mon Sep 17 00:00:00 2001
From: Eike Kettner <eike.kettner@posteo.de>
Date: Sun, 18 Oct 2020 14:26:18 +0200
Subject: [PATCH] Show item name in document title

---
 modules/webapp/src/main/elm/Main.elm | 13 +++++++++++--
 1 file changed, 11 insertions(+), 2 deletions(-)

diff --git a/modules/webapp/src/main/elm/Main.elm b/modules/webapp/src/main/elm/Main.elm
index fbc29b5e..773c6297 100644
--- a/modules/webapp/src/main/elm/Main.elm
+++ b/modules/webapp/src/main/elm/Main.elm
@@ -11,7 +11,7 @@ import Data.UiSettings
 import Html exposing (..)
 import Html.Attributes exposing (..)
 import Html.Events exposing (..)
-import Page
+import Page exposing (Page(..))
 import Ports
 import Url exposing (Url)
 
@@ -73,7 +73,16 @@ init flags url key =
 
 viewDoc : Model -> Document Msg
 viewDoc model =
-    { title = model.flags.config.appName ++ ": " ++ Page.pageName model.page
+    let
+        title =
+            case model.page of
+                ItemDetailPage _ ->
+                    model.itemDetailModel.detail.item.name
+
+                _ ->
+                    Page.pageName model.page
+    in
+    { title = model.flags.config.appName ++ ": " ++ title
     , body = [ view model ]
     }