From f7bfc040a062b3f5a3549abd87463221c667f1d5 Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Mon, 31 Jul 2017 00:16:24 +1000
Subject: Made logo code more concise

---
 src/windows.adb | 15 ---------------
 1 file changed, 15 deletions(-)

(limited to 'src/windows.adb')

diff --git a/src/windows.adb b/src/windows.adb
index d637905..d8d2f5b 100644
--- a/src/windows.adb
+++ b/src/windows.adb
@@ -1,10 +1,5 @@
 
 
-with
-
-    FLTK.Widgets.Groups.Windows;
-
-
 package body Windows is
 
 
@@ -13,16 +8,6 @@ package body Windows is
 
 
 
-    procedure Set_Logo
-           (This : in out Window;
-            Logo : in out FLTK.Images.RGB.PNG.PNG_Image) is
-    begin
-        This.Set_Icon (Logo);
-    end Set_Logo;
-
-
-
-
     --  Used to hide about/find/replace/etc windows instead
     --  of constantly creating and destroying them.
 
-- 
cgit