From 6e578fcc68f7b6ef82c794a231f1902451a4b37a 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 6348211a..4ef9cbeb 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