summaryrefslogtreecommitdiff
path: root/src/fltk-widgets-menus.adb
diff options
context:
space:
mode:
authorJed Barber <jjbarber@y7mail.com>2017-05-06 17:59:20 +1000
committerJed Barber <jjbarber@y7mail.com>2017-05-06 17:59:20 +1000
commitc2c5985b130e02b970cb6bf88c9a81e6e72c6646 (patch)
treed9ce987f2c2e5aafb5ee10f4b2283ca7f1c81e99 /src/fltk-widgets-menus.adb
parent5f91a787afcebae37b5e22ab0dfe93b2a9794226 (diff)
Cleaned up positioning of Draw procedures
Diffstat (limited to 'src/fltk-widgets-menus.adb')
-rw-r--r--src/fltk-widgets-menus.adb3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/fltk-widgets-menus.adb b/src/fltk-widgets-menus.adb
index afb007c..84e2f61 100644
--- a/src/fltk-widgets-menus.adb
+++ b/src/fltk-widgets-menus.adb
@@ -93,7 +93,8 @@ package body FLTK.Widgets.Menus is
procedure Draw
(This : in out Menu) is
begin
- fl_menu_draw (This.Void_Ptr);
+ -- this space intentionally left blank
+ null;
end Draw;