Allow to revert to Zone pages on reload.

src/App/Container.purs

@@ -326,7 +326,9 @@ handleAction = case _ of
   Routing page -> do
     -- Store the current page we are on and restore it when we reload.
     sessionstorage <- H.liftEffect $ Window.sessionStorage =<< HTML.window
-    H.liftEffect $ Storage.setItem "current-page" (show page) sessionstorage
+    H.liftEffect $ Storage.setItem "current-page" (case page of
+      Zone _ -> "Zone"
+      _      -> show page) sessionstorage
 
     _ <- case page of
       Zone zone  -> H.liftEffect $ Storage.setItem "current-zone" zone sessionstorage