diff options
Diffstat (limited to 'src/windows-replace.adb')
-rw-r--r-- | src/windows-replace.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/windows-replace.adb b/src/windows-replace.adb index 1393711..4b9345e 100644 --- a/src/windows-replace.adb +++ b/src/windows-replace.adb @@ -3,6 +3,7 @@ package body Windows.Replace 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; @@ -92,7 +93,7 @@ package body Windows.Replace is This.Set_Icon (Logo); This.Set_Callback (Hide_CB'Access); - This.Set_Modal; + This.Set_Modal_State (W.Modal); end return; end Create; |