Store item selection globally

modules/webapp/src/main/elm/Data/Environment.elm

@@ -0,0 +1,31 @@
+{-
+   Copyright 2020 Eike K. & Contributors
+
+   SPDX-License-Identifier: AGPL-3.0-or-later
+-}
+
+
+module Data.Environment exposing (..)
+
+import Browser.Navigation as Nav
+import Data.Flags exposing (Flags)
+import Data.ItemIds exposing (ItemIds)
+import Data.UiSettings exposing (UiSettings)
+
+
+type alias Update =
+    { bookmarkId : Maybe String
+    , lastViewedItemId : Maybe String
+    , key : Nav.Key
+    , selectedItems : ItemIds
+    , flags : Flags
+    , settings : UiSettings
+    }
+
+
+type alias View =
+    { flags : Flags
+    , sidebarVisible : Bool
+    , settings : UiSettings
+    , selectedItems : ItemIds
+    }