summaryrefslogtreecommitdiff
path: root/src/fltk_binding/fltk-widgets-menus.ads
diff options
context:
space:
mode:
Diffstat (limited to 'src/fltk_binding/fltk-widgets-menus.ads')
-rw-r--r--src/fltk_binding/fltk-widgets-menus.ads2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/fltk_binding/fltk-widgets-menus.ads b/src/fltk_binding/fltk-widgets-menus.ads
index acb59bd..27b9d4a 100644
--- a/src/fltk_binding/fltk-widgets-menus.ads
+++ b/src/fltk_binding/fltk-widgets-menus.ads
@@ -57,7 +57,7 @@ package FLTK.Widgets.Menus is
procedure Add
(This : in out Menu;
Text : in String;
- Action : access Widget_Callback'Class := null;
+ Action : in Widget_Callback := null;
Shortcut : in Shortcut_Key := No_Key;
Flags : in Menu_Flag := Flag_Normal);