From ca9cca53a19145216cb0e00462db239e1194696d Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Sun, 29 Apr 2018 00:39:36 +1000 Subject: FLTK.Event done, a whole bunch more polishing --- src/fltk-widgets-inputs.ads | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/fltk-widgets-inputs.ads') diff --git a/src/fltk-widgets-inputs.ads b/src/fltk-widgets-inputs.ads index c22efb3..692baa4 100644 --- a/src/fltk-widgets-inputs.ads +++ b/src/fltk-widgets-inputs.ads @@ -96,11 +96,11 @@ package FLTK.Widgets.Inputs is function Get_Shortcut_Key (This : in Input) - return Shortcut_Key; + return Key_Combo; procedure Set_Shortcut_Key (This : in out Input; - To : in Shortcut_Key); + To : in Key_Combo); function Get_Mark (This : in Input) -- cgit