From ba52d84ce14c3598032e7758774e0585e9d1db31 Mon Sep 17 00:00:00 2001 From: Richard Webb Date: Tue, 26 Mar 2024 16:00:36 +0000 Subject: [PATCH] Remove the hard coded path separators for the music player sample icon --- .../Elmish Examples/Examples.Elmish.MusicPlayer/Shell.fs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/Examples/Elmish Examples/Examples.Elmish.MusicPlayer/Shell.fs b/src/Examples/Elmish Examples/Examples.Elmish.MusicPlayer/Shell.fs index a2d6d4be..6feb2c68 100644 --- a/src/Examples/Elmish Examples/Examples.Elmish.MusicPlayer/Shell.fs +++ b/src/Examples/Elmish Examples/Examples.Elmish.MusicPlayer/Shell.fs @@ -185,8 +185,10 @@ module Shell = type ShellWindow() as this = inherit HostWindow() do + let iconPath = System.IO.Path.Combine("Assets", "Icons", "icon.ico") + base.Title <- "Music Player in F# :)" - base.Icon <- WindowIcon("Assets\Icons\icon.ico") + base.Icon <- WindowIcon(iconPath) base.Width <- 800.0 base.Height <- 600.0 base.MinWidth <- 526.0