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-jump.adb | |
parent | 468cdc37c83cd51eb1b0656bc7faeaf2099e0918 (diff) |
Updated to bring into line with FLTK binding
Diffstat (limited to 'src/windows-jump.adb')
-rw-r--r-- | src/windows-jump.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/windows-jump.adb b/src/windows-jump.adb index 898ce04..f19315e 100644 --- a/src/windows-jump.adb +++ b/src/windows-jump.adb @@ -3,6 +3,7 @@ package body Windows.Jump is + package W renames FLTK.Widgets.Groups.Windows; package WD renames FLTK.Widgets.Groups.Windows.Double; package BU renames FLTK.Widgets.Buttons; package EN renames FLTK.Widgets.Buttons.Enter; @@ -67,7 +68,7 @@ package body Windows.Jump is This.Set_Icon (Logo); This.Set_Callback (Hide_CB'Access); - This.Set_Modal; + This.Set_Modal_State (W.Modal); end return; end Create; |