X-Git-Url: http://git.euphorik.ch/?p=master-thesis.git;a=blobdiff_plain;f=Parasitemia%2FParasitemiaUI%2FDPICalculator.fs;h=5e9c19ba812c8aaef239b0582a532ec3d3286394;hp=dbd7251e5f50e37f751a542249569019c756de1f;hb=04d4504e7b248a82ddfc1a41d325e59d24146590;hpb=276f1c9741f196e022bdbd175b4f6ef0ebb6367d

diff --git a/Parasitemia/ParasitemiaUI/DPICalculator.fs b/Parasitemia/ParasitemiaUI/DPICalculator.fs
index dbd7251..5e9c19b 100644
--- a/Parasitemia/ParasitemiaUI/DPICalculator.fs
+++ b/Parasitemia/ParasitemiaUI/DPICalculator.fs
@@ -1,4 +1,4 @@
-module ParasitemiaUI.DPICalculator
+module ParasitemiaUI.PPICalculator
 
 open System
 open System.Windows
@@ -19,7 +19,7 @@ type SensorSize = {
         sprintf "%g mm × %g mm%s" this.w this.h (if this.txt = "" then "" else " (" + this.txt + ")")
 
 let showWindow (parent: Window) : int option =
-    let win = Views.DPICalculatorWindow()
+    let win = Views.PPICalculatorWindow()
     win.Root.Owner <- parent
     win.Root.Left <- parent.Left + parent.ActualWidth / 2. - win.Root.Width / 2.
     win.Root.Top <- parent.Top + parent.ActualHeight / 2. - win.Root.Height / 2.