handle update state / action re: About screen

relates to #97
CodeforAustralia · Aug 15, 2016 · b8e195b · b8e195b
1 parent a9fe52a
commit b8e195b
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/prototype/src/App.elm b/prototype/src/App.elm
@@ -213,6 +213,7 @@ updateModel action app = case (app.location, action) of
     --(_, View story')                          -> {app | location = Viewing story' initialItemView screen1}
     (_, View story' screen')                  -> {app | location = Viewing story' initialItemView screen'}
     (_, ViewFavourites)                       -> {app | location = ViewingFavourites}
+    (_, ViewAboutScreen)                      -> {app | location = AboutScreen}
     -- Data update actions
     (_, LoadData updateItems)                 -> {app | items = updateItems app.items}
     (_, LoadDiscoveryData items updateItems)  -> {app | items = updateItems app.items, discovery = updateDiscoverableItems app.discovery items}