X-Git-Url: http://git.euphorik.ch/?a=blobdiff_plain;f=Parasitemia%2FParasitemiaUI%2FGUI.fs;h=3746461e567527b6299573bb6f9fe5bb0da41566;hb=e588f9c954a54cb259b2c1f6f9e8d9dbd4639269;hp=d749479a037cec8f8aee3ee81235a8902348109c;hpb=c4a76a01f62568c6353396ff85551a3151fc5236;p=master-thesis.git diff --git a/Parasitemia/ParasitemiaUI/GUI.fs b/Parasitemia/ParasitemiaUI/GUI.fs index d749479..3746461 100644 --- a/Parasitemia/ParasitemiaUI/GUI.fs +++ b/Parasitemia/ParasitemiaUI/GUI.fs @@ -24,7 +24,7 @@ let run (defaultConfig: Config) (fileToOpen: string option) = let mainWindow = Views.MainWindow() let ctrl (name: string): 'a = mainWindow.Root.FindName(name) :?> 'a - let state = State.State() + let state = State.State(defaultConfig) let mutable currentScale = 1. let mutable displayHealthy = false let warningBelowNumberOfRBC = 1000 @@ -165,7 +165,7 @@ let run (defaultConfig: Config) (fileToOpen: string option) = then txtGlobalParasitemia.Inlines.Add( Documents.Run( - sprintf " Warning: the number of erytrocytes should be above %d" warningBelowNumberOfRBC, + sprintf " Warning: the number of erythrocytes should be above %d" warningBelowNumberOfRBC, FontWeight = FontWeights.Bold, Foreground = Brushes.Red))