diff options
Diffstat (limited to 'src/fltk-widgets-groups-input_choices.adb')
| -rw-r--r-- | src/fltk-widgets-groups-input_choices.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/fltk-widgets-groups-input_choices.adb b/src/fltk-widgets-groups-input_choices.adb index 76bd3f9..603d480 100644 --- a/src/fltk-widgets-groups-input_choices.adb +++ b/src/fltk-widgets-groups-input_choices.adb @@ -198,7 +198,7 @@ package body FLTK.Widgets.Groups.Input_Choices is function Input (This : in out Input_Choice) - return INP.Input_Cursor is + return INP.Input_Reference is begin return (Data => This.My_Input); end Input; |