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

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.