X-Git-Url: http://git.euphorik.ch/?a=blobdiff_plain;f=Parasitemia%2FParasitemiaUI%2FAbout.fs;h=d421e225347cc0d9ee7a91b485dc2021a4429015;hb=e37e89a261df15d46d5128f18f9764d1cf81fd86;hp=8c643b7f844ca068c40167cd550bb4d721345d91;hpb=2d712781def419c9acc98368f7102b19b064f16d;p=master-thesis.git

diff --git a/Parasitemia/ParasitemiaUI/About.fs b/Parasitemia/ParasitemiaUI/About.fs
index 8c643b7..d421e22 100644
--- a/Parasitemia/ParasitemiaUI/About.fs
+++ b/Parasitemia/ParasitemiaUI/About.fs
@@ -1,12 +1,12 @@
 module ParasitemiaUI.About
 
-open System
 open System.Windows
-open System.Windows.Controls
 open System.Diagnostics
 
+open ParasitemiaUIControls
+
 let showWindow (parent : Window) =
-    let win = Views.AboutWindow ()
+    let win = AboutWindow ()
     win.Owner <- parent
 
     win.Left <- (if parent.WindowState = WindowState.Maximized then 0. else parent.Left) + parent.ActualWidth / 2. - win.Width / 2.