From e5f4cdd01d2a4b3673d543cba7539d691244af3a Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Mon, 22 May 2017 20:58:53 +1000 Subject: Updated to work with updated FLTK Ada binding --- src/windows-jump.ads | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/windows-jump.ads') diff --git a/src/windows-jump.ads b/src/windows-jump.ads index baf355c..f47db24 100644 --- a/src/windows-jump.ads +++ b/src/windows-jump.ads @@ -2,7 +2,7 @@ with FLTK.Widgets.Groups.Windows.Double; private with FLTK.Widgets.Buttons.Enter; -private with FLTK.Widgets.Inputs.Int; +private with FLTK.Widgets.Inputs.Integer; package Windows.Jump is @@ -40,7 +40,7 @@ private type Jump_Window is new FLTK.Widgets.Groups.Windows.Double.Double_Window with record - To_Line : FLTK.Widgets.Inputs.Int.Integer_Input; + To_Line : FLTK.Widgets.Inputs.Integer.Integer_Input; Cancel : FLTK.Widgets.Buttons.Button; Go_Jump : FLTK.Widgets.Buttons.Enter.Enter_Button; Callback : Jump_Callback; -- cgit