Fix an exception when opening the links from the about window

[master-thesis.git] / Parasitemia / ParasitemiaUI / About.fs

diff --git a/Parasitemia/ParasitemiaUI/About.fs b/Parasitemia/ParasitemiaUI/About.fs
index d421e22..5d0a17d 100644 (file)
--- a/Parasitemia/ParasitemiaUI/About.fs
+++ b/Parasitemia/ParasitemiaUI/About.fs
@@ -19,7 +19,7 @@ let showWindow (parent : Window) =
     let navigateTo =
         Navigation.RequestNavigateEventHandler (
             fun obj args ->
-                Process.Start (ProcessStartInfo args.Uri.AbsoluteUri) |> ignore
+                Process.Start (ProcessStartInfo (args.Uri.AbsoluteUri, UseShellExecute = true)) |> ignore
                 args.Handled <- true
         )