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-jump.adb | |
| parent | 3592854ef4ebeab8c099defb5745623eb849111b (diff) | |
Made logo code more concise
Diffstat (limited to 'src/windows-jump.adb')
| -rw-r--r-- | src/windows-jump.adb | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/src/windows-jump.adb b/src/windows-jump.adb index 5d263ba..7503ec7 100644 --- a/src/windows-jump.adb +++ b/src/windows-jump.adb @@ -1,12 +1,5 @@ -with - - FLTK.Widgets.Groups.Windows.Double, - FLTK.Widgets.Buttons.Enter, - FLTK.Widgets.Inputs.Integer; - - package body Windows.Jump is @@ -71,6 +64,8 @@ package body Windows.Jump is This.Add (This.Go_Jump); This.Go_Jump.Set_Callback (Jump_M'Access); + This.Set_Icon (Logo); + This.Set_Callback (Hide_CB'Access); This.Set_Modal; end return; |