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.ads | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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

diff --git a/src/fltk-dialogs.ads b/src/fltk-dialogs.ads
index 0368834..03d1416 100644
--- a/src/fltk-dialogs.ads
+++ b/src/fltk-dialogs.ads
@@ -78,7 +78,7 @@ package FLTK.Dialogs is
             Size : in Font_Size);
 
     function Get_Message_Icon
-        return FLTK.Widgets.Boxes.Box_Cursor;
+        return FLTK.Widgets.Boxes.Box_Reference;
 
     procedure Set_Message_Title
            (To : in String);
-- 
cgit