From 99cf19a3cb38fd251c22dcd0f288db14ea8e7c75 Mon Sep 17 00:00:00 2001
From: pjurewicz <piotr.jurewicz@arkency.com>
Date: Wed, 20 Mar 2024 22:25:55 +0100
Subject: [PATCH] move Debug page to separate module

---
 ruby_event_store-browser/elm/src/Main.elm       | 7 ++++++-
 ruby_event_store-browser/elm/src/Page/Debug.elm | 7 +++++++
 2 files changed, 13 insertions(+), 1 deletion(-)
 create mode 100644 ruby_event_store-browser/elm/src/Page/Debug.elm

diff --git a/ruby_event_store-browser/elm/src/Main.elm b/ruby_event_store-browser/elm/src/Main.elm
index 5327d43ac2..212b417f34 100644
--- a/ruby_event_store-browser/elm/src/Main.elm
+++ b/ruby_event_store-browser/elm/src/Main.elm
@@ -10,6 +10,7 @@ import Layout
 import LinkedTimezones exposing (mapLinkedTimeZone)
 import Page.ShowEvent
 import Page.ShowStream
+import Page.Debug
 import Route
 import Task
 import Time
@@ -270,7 +271,11 @@ viewPage page selectedTime =
             ( Just title, Html.map GotShowEventMsg content )
 
         Debug ->
-            ( Just "Debug", text "to be filled with some helpful content" )
+            let
+                content =
+                    Page.Debug.view
+            in
+            ( Just "Debug", content )
 
         NotFound ->
             ( Nothing, Layout.viewNotFound )
diff --git a/ruby_event_store-browser/elm/src/Page/Debug.elm b/ruby_event_store-browser/elm/src/Page/Debug.elm
new file mode 100644
index 0000000000..2c4bd51d80
--- /dev/null
+++ b/ruby_event_store-browser/elm/src/Page/Debug.elm
@@ -0,0 +1,7 @@
+module Page.Debug exposing (..)
+
+import Html exposing (..)
+
+view: Html a
+view =
+    text "to be filled with some helpful content"