From a4b6a06f372923fb38ae4d3c7e0429ce93ea7748 Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Sun, 15 Apr 2018 19:41:33 +1000
Subject: Started process of polishing packages

---
 src/fltk-dialogs.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/fltk-dialogs.adb')

diff --git a/src/fltk-dialogs.adb b/src/fltk-dialogs.adb
index 20f4c6b..46c14ad 100644
--- a/src/fltk-dialogs.adb
+++ b/src/fltk-dialogs.adb
@@ -259,7 +259,7 @@ package body FLTK.Dialogs is
 
 
     function Get_Message_Icon
-        return FLTK.Widgets.Boxes.Box_Cursor is
+        return FLTK.Widgets.Boxes.Box_Reference is
     begin
         return (Data => Icon_Box'Access);
     end Get_Message_Icon;
-- 
cgit