1 files changed, 2 insertions, 5 deletions
diff --git a/src/windows.adb b/src/windows.adb
index bf070a4..3c2020d 100644
--- a/src/windows.adb
+++ b/src/windows.adb
@@ -1,6 +1,5 @@
 
 
-with FLTK.Widgets;
 with FLTK.Widgets.Groups;
 with FLTK.Widgets.Groups.Windows;
 
@@ -8,8 +7,6 @@ with FLTK.Widgets.Groups.Windows;
 package body Windows is
 
 
-    package W  renames FLTK.Widgets;
-    package G  renames FLTK.Widgets.Groups;
     package WN renames FLTK.Widgets.Groups.Windows;
 
 
@@ -19,9 +16,9 @@ package body Windows is
     --  of constantly creating and destroying them
 
     procedure Hide_CB
-           (Item : in out W.Widget'Class)
+           (Item : in out FLTK.Widgets.Widget'Class)
     is
-        P : access G.Group'Class;
+        P : access FLTK.Widgets.Groups.Group'Class;
     begin
         if Item in WN.Window'Class then
             WN.Window (Item).Hide;