From f419b275ee91792e08f211a588d891c4aa6bedac Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Fri, 15 Jul 2016 22:20:30 +1000 Subject: Groups and Widgets should now keep track of themselves properly, also all named access types removed --- fltk-widgets-buttons-enter.ads | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'fltk-widgets-buttons-enter.ads') diff --git a/fltk-widgets-buttons-enter.ads b/fltk-widgets-buttons-enter.ads index 9e5abf6..1db7308 100644 --- a/fltk-widgets-buttons-enter.ads +++ b/fltk-widgets-buttons-enter.ads @@ -1,16 +1,17 @@ -- Return Buttons, but return is a reserved word, so they're Enter Buttons instead + + package FLTK.Widgets.Buttons.Enter is type Enter_Button is new Button with private; - type Enter_Button_Access is access all Enter_Button; function Create (X, Y, W, H : in Integer; - Label : in String) + Text : in String) return Enter_Button; -- cgit