From bc54653c3e5277afecaecf2f208e1ee335df3a6e Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Tue, 4 Oct 2016 00:32:30 +1100
Subject: Find/Replace marshalling back to Adapad Main done, some
 Group/Widget_Cursor stuff removed

---
 fltk-widgets-groups.ads | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'fltk-widgets-groups.ads')

diff --git a/fltk-widgets-groups.ads b/fltk-widgets-groups.ads
index e777f04..57faf87 100644
--- a/fltk-widgets-groups.ads
+++ b/fltk-widgets-groups.ads
@@ -24,7 +24,7 @@ package FLTK.Widgets.Groups is
     function Child
            (This  : in Group;
             Place : in Index)
-        return Widget_Cursor;
+        return access Widget'Class;
 
 
     function Number_Of_Children
-- 
cgit