diff options
| author | Jed Barber <jjbarber@y7mail.com> | 2017-07-31 00:16:24 +1000 |
|---|---|---|
| committer | Jed Barber <jjbarber@y7mail.com> | 2017-07-31 00:16:24 +1000 |
| commit | f7bfc040a062b3f5a3549abd87463221c667f1d5 (patch) | |
| tree | 8c5564a52f242bef674176a03b66e1812c8975a6 /src/windows-find.adb | |
| parent | 3592854ef4ebeab8c099defb5745623eb849111b (diff) | |
Made logo code more concise
Diffstat (limited to 'src/windows-find.adb')
| -rw-r--r-- | src/windows-find.adb | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/src/windows-find.adb b/src/windows-find.adb index 8ae6685..2096436 100644 --- a/src/windows-find.adb +++ b/src/windows-find.adb @@ -1,13 +1,5 @@ -with - - FLTK.Widgets.Groups.Windows.Double, - FLTK.Widgets.Inputs, - FLTK.Widgets.Buttons.Enter, - FLTK.Widgets.Buttons.Light.Check; - - package body Windows.Find is @@ -85,6 +77,8 @@ package body Windows.Find is This.Add (This.Start); This.Start.Set_Callback (Find_M'Access); + This.Set_Icon (Logo); + This.Set_Callback (Hide_CB'Access); This.Set_Modal; end return; |