diff options
| author | Jed Barber <jjbarber@y7mail.com> | 2016-11-09 09:12:26 +1100 |
|---|---|---|
| committer | Jed Barber <jjbarber@y7mail.com> | 2016-11-09 09:12:26 +1100 |
| commit | e0ee146d740146cd4c80de22d6bf6e204efadfa0 (patch) | |
| tree | 5549e0b0057e9be10e88a439f40dc8d197f26505 /fltk-widgets-menus.adb | |
| parent | c3592231733f3f52aa9fdfd83ac93eb9ee1865e1 (diff) | |
Removed superfluous use clauses, styling now more standardised
Diffstat (limited to 'fltk-widgets-menus.adb')
| -rw-r--r-- | fltk-widgets-menus.adb | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/fltk-widgets-menus.adb b/fltk-widgets-menus.adb index be5b7c3..7669820 100644 --- a/fltk-widgets-menus.adb +++ b/fltk-widgets-menus.adb @@ -118,11 +118,10 @@ package body FLTK.Widgets.Menus is Text : in String; Action : access Widget_Callback'Class := null; Shortcut : in Shortcut_Key := No_Key; - Flags : in Menu_Flag := Flag_Normal) is - + Flags : in Menu_Flag := Flag_Normal) + is Place : Interfaces.C.int; Callback, User_Data : System.Address; - begin if Action = null then Callback := System.Null_Address; |