summaryrefslogtreecommitdiff
path: root/src/fltk-widgets-buttons.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/fltk-widgets-buttons.adb')
-rw-r--r--src/fltk-widgets-buttons.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/fltk-widgets-buttons.adb b/src/fltk-widgets-buttons.adb
index 0547ffa..11a57de 100644
--- a/src/fltk-widgets-buttons.adb
+++ b/src/fltk-widgets-buttons.adb
@@ -271,7 +271,7 @@ package body FLTK.Widgets.Buttons is
(This : in Button)
return Key_Combo is
begin
- return To_Ada (Interfaces.C.unsigned_long (fl_button_get_shortcut (This.Void_Ptr)));
+ return To_Ada (fl_button_get_shortcut (This.Void_Ptr));
end Get_Shortcut;