From e644b575c5f7ae9b78df2bb6985ec352a7c0f0e0 Mon Sep 17 00:00:00 2001 From: Jedidiah Barber Date: Sat, 1 Feb 2025 23:49:05 +1300 Subject: Filled holes in Fl_Text_Display API, fixed some Shortcut subprogram inconsistencies --- spec/fltk-widgets-inputs.ads | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'spec/fltk-widgets-inputs.ads') diff --git a/spec/fltk-widgets-inputs.ads b/spec/fltk-widgets-inputs.ads index c7f9c17..2518fbb 100644 --- a/spec/fltk-widgets-inputs.ads +++ b/spec/fltk-widgets-inputs.ads @@ -132,11 +132,11 @@ package FLTK.Widgets.Inputs is (This : in Input) return Input_Kind; - function Get_Shortcut_Key + function Get_Shortcut (This : in Input) return Key_Combo; - procedure Set_Shortcut_Key + procedure Set_Shortcut (This : in out Input; To : in Key_Combo); @@ -326,8 +326,8 @@ private pragma Inline (Set_Wrap); pragma Inline (Get_Kind); - pragma Inline (Get_Shortcut_Key); - pragma Inline (Set_Shortcut_Key); + pragma Inline (Get_Shortcut); + pragma Inline (Set_Shortcut); pragma Inline (Get_Mark); pragma Inline (Set_Mark); pragma Inline (Get_Position); -- cgit