Show item detail for a shared item

modules/webapp/src/main/elm/App/Update.elm

@@ -613,8 +613,19 @@ initPage model_ page =
                 ]
                 model
 
-        SharePage _ ->
-            ( model, Cmd.none, Sub.none )
+        SharePage id ->
+            let
+                cmd =
+                    Cmd.map ShareMsg (Page.Share.Data.initCmd id model.flags)
+
+                shareModel =
+                    model.shareModel
+            in
+            if shareModel.initialized then
+                ( model, Cmd.none, Sub.none )
+
+            else
+                ( { model | shareModel = { shareModel | initialized = True } }, cmd, Sub.none )
 
         ShareDetailPage _ _ ->
             case model_.page of

modules/webapp/src/main/elm/App/View2.elm

@@ -451,6 +451,8 @@ viewShareDetail texts shareId itemId model =
             model.sidebarVisible
             model.flags
             model.uiSettings
+            shareId
+            itemId
             model.shareDetailModel
         )
     , Html.map ShareDetailMsg