From: Greg Burri Date: Mon, 22 Mar 2021 12:16:38 +0000 (+0100) Subject: Fix an exception when opening the links from the about window X-Git-Tag: 1.0.13~2 X-Git-Url: http://git.euphorik.ch/?p=master-thesis.git;a=commitdiff_plain;h=3c43609ff19e07331977fb7b62757cc3abd73387 Fix an exception when opening the links from the about window --- diff --git a/Parasitemia/ParasitemiaCore/ParasitemiaCore.fsproj b/Parasitemia/ParasitemiaCore/ParasitemiaCore.fsproj index 14fc5a9..7b5ec47 100644 --- a/Parasitemia/ParasitemiaCore/ParasitemiaCore.fsproj +++ b/Parasitemia/ParasitemiaCore/ParasitemiaCore.fsproj @@ -3,9 +3,9 @@ Library net5.0 - 1.0.12 - 1.0.0.12 - 1.0.0.12 + 1.0.13 + 1.0.0.13 + 1.0.0.13 Greg Burri CHUV & HES-SO diff --git a/Parasitemia/ParasitemiaUI/About.fs b/Parasitemia/ParasitemiaUI/About.fs index d421e22..5d0a17d 100644 --- 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 ) diff --git a/Parasitemia/ParasitemiaUI/ParasitemiaUI.fsproj b/Parasitemia/ParasitemiaUI/ParasitemiaUI.fsproj index db15b1e..d6e4ebc 100644 --- a/Parasitemia/ParasitemiaUI/ParasitemiaUI.fsproj +++ b/Parasitemia/ParasitemiaUI/ParasitemiaUI.fsproj @@ -4,9 +4,9 @@ WinExe net5.0-windows true - 1.0.0.12 - 1.0.0.12 - 1.0.12 + 1.0.0.13 + 1.0.0.13 + 1.0.13 Greg Burri CHUV & HES-SO