From 1bb480e72b6511e84801968402f183e7b5f68126 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn=20Aneer?=
 <3542167+beyon@users.noreply.github.com>
Date: Fri, 27 Oct 2023 20:29:42 +0200
Subject: [PATCH] Fix duplicate example window titles

---
 src/Examples/Component Examples/Examples.EnvApp/Program.fs | 2 +-
 src/Examples/Examples.DataGridPlayground/Program.fs        | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Examples/Component Examples/Examples.EnvApp/Program.fs b/src/Examples/Component Examples/Examples.EnvApp/Program.fs
index 752bdcb0..c3e8f624 100644
--- a/src/Examples/Component Examples/Examples.EnvApp/Program.fs	
+++ b/src/Examples/Component Examples/Examples.EnvApp/Program.fs	
@@ -202,7 +202,7 @@ type Views =
 type MainWindow() as this =
     inherit HostWindow()
     do
-        base.Title <- "Drawing App"
+        base.Title <- "Environment App"
         base.Width <- 500.0
         base.Height <- 500.0
         this.Content <- Views.main ()
diff --git a/src/Examples/Examples.DataGridPlayground/Program.fs b/src/Examples/Examples.DataGridPlayground/Program.fs
index ba77f815..495f8a59 100644
--- a/src/Examples/Examples.DataGridPlayground/Program.fs
+++ b/src/Examples/Examples.DataGridPlayground/Program.fs
@@ -77,7 +77,7 @@ type Views =
 type MainWindow() as this =
     inherit HostWindow()
     do
-        base.Title <- "Drawing App"
+        base.Title <- "DataGrid Playground"
         base.Width <- 500.0
         base.Height <- 500.0
         this.Content <- Views.main ()