diff options
author | Jed Barber <jjbarber@y7mail.com> | 2018-05-15 16:38:23 +1000 |
---|---|---|
committer | Jed Barber <jjbarber@y7mail.com> | 2018-05-15 16:38:23 +1000 |
commit | 7ec40156bf80af71ebf3f51129af42a01221f250 (patch) | |
tree | 5c5570dc27137848dfb176157c8a6bb898447bea /src/windows-find.adb | |
parent | 468cdc37c83cd51eb1b0656bc7faeaf2099e0918 (diff) |
Updated to bring into line with FLTK binding
Diffstat (limited to 'src/windows-find.adb')
-rw-r--r-- | src/windows-find.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/windows-find.adb b/src/windows-find.adb index 02698da..0336ce0 100644 --- a/src/windows-find.adb +++ b/src/windows-find.adb @@ -3,6 +3,7 @@ package body Windows.Find is + package W renames FLTK.Widgets.Groups.Windows; package WD renames FLTK.Widgets.Groups.Windows.Double; package IP renames FLTK.Widgets.Inputs; package BU renames FLTK.Widgets.Buttons; @@ -80,7 +81,7 @@ package body Windows.Find is This.Set_Icon (Logo); This.Set_Callback (Hide_CB'Access); - This.Set_Modal; + This.Set_Modal_State (W.Modal); end return; end Create; |