summaryrefslogtreecommitdiff
path: root/src/fltk-widgets-valuators-value_inputs.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/fltk-widgets-valuators-value_inputs.adb')
-rw-r--r--src/fltk-widgets-valuators-value_inputs.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/fltk-widgets-valuators-value_inputs.adb b/src/fltk-widgets-valuators-value_inputs.adb
index f92d03b..6091d55 100644
--- a/src/fltk-widgets-valuators-value_inputs.adb
+++ b/src/fltk-widgets-valuators-value_inputs.adb
@@ -299,7 +299,7 @@ package body FLTK.Widgets.Valuators.Value_Inputs is
(This : in Value_Input)
return Key_Combo is
begin
- return To_Ada (Interfaces.C.unsigned_long (fl_value_input_get_shortcut (This.Void_Ptr)));
+ return To_Ada (fl_value_input_get_shortcut (This.Void_Ptr));
end Get_Shortcut;