X-Git-Url: http://git.euphorik.ch/?p=master-thesis.git;a=blobdiff_plain;f=Parasitemia%2FParasitemiaUI%2FProgram.fs;h=b3ca81d50193cd578ccd9accfd2c064414d1b8f6;hp=63bd96365250efed8629b91193b852e47f7fd052;hb=8cf2153bd18919de41745534d3dbf134f085e13c;hpb=6250f10c807301a760b8659f9c00ca6dbbd4c7b7 diff --git a/Parasitemia/ParasitemiaUI/Program.fs b/Parasitemia/ParasitemiaUI/Program.fs index 63bd963..b3ca81d 100644 --- a/Parasitemia/ParasitemiaUI/Program.fs +++ b/Parasitemia/ParasitemiaUI/Program.fs @@ -84,7 +84,7 @@ let main args = let images = [ for file in files -> Path.GetFileNameWithoutExtension (FileInfo(file).Name), config.Copy (), new Image (file) ] - Log.LogWithTime Severity.INFO ( + Log.LogWithTime Types.Severity.INFO ( fun () -> match ParasitemiaCore.Analysis.doMultipleAnalysis images None with | Some results -> @@ -98,7 +98,7 @@ let main args = Some () ) "Whole analyze" |> ignore - Log.RmListener listener + Log.RemoveListener listener 0 | Window fileToOpen ->