From 0fad5693b47c669384a20e7b3635879aeba96c27 Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Tue, 23 May 2017 00:31:13 +1000
Subject: Removed superfluous Wrapper Finalize call in Image Finalize

---
 src/fltk-images.adb | 1 -
 1 file changed, 1 deletion(-)

diff --git a/src/fltk-images.adb b/src/fltk-images.adb
index 5d3a1ed..906fc46 100644
--- a/src/fltk-images.adb
+++ b/src/fltk-images.adb
@@ -70,7 +70,6 @@ package body FLTK.Images is
             free_fl_image (This.Void_Ptr);
             This.Void_Ptr := System.Null_Address;
         end if;
-        Finalize (Wrapper (This));
     end Finalize;
 
 
-- 
cgit