1 files changed, 4 insertions, 11 deletions
diff --git a/src/windows.ads b/src/windows.ads
index 8050467..222efcf 100644
--- a/src/windows.ads
+++ b/src/windows.ads
@@ -3,12 +3,8 @@
 with
 
     FLTK.Widgets.Groups.Windows.Double,
-    FLTK.Images.RGB.PNG;
-
-private with
-
-    Ada.Command_Line,
-    Ada.Directories;
+    FLTK.Images.RGB,
+    Images;
 
 
 package Windows is
@@ -27,12 +23,9 @@ private
            (Item : in out FLTK.Widgets.Widget'Class);
 
 
-    Origin : String := Ada.Directories.Containing_Directory
-        (Ada.Directories.Full_Name (Ada.Command_Line.Command_Name));
-
-    Logo : FLTK.Images.RGB.PNG.PNG_Image :=
-        FLTK.Images.RGB.PNG.Forge.Create (Origin & "/../share/adapad/logo.png");
+    Logo : FLTK.Images.RGB.RGB_Image'Class := Images.Load_Logo;
 
 
 end Windows;
 
+