diff options
| -rw-r--r-- | src/windows-editor.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/windows-editor.adb b/src/windows-editor.adb index b0c2d02..2a7b991 100644 --- a/src/windows-editor.adb +++ b/src/windows-editor.adb @@ -98,7 +98,7 @@ package body Windows.Editor is (This : in out Editor_Window) return FLTK.Widgets.Menus.Menu_Reference is begin - return Ref : FLTK.Widgets.Menus.Menu_Reference (This.Bar'Access); + return Ref : FLTK.Widgets.Menus.Menu_Reference (This.Bar'Unchecked_Access); end Get_Menu_Bar; @@ -108,7 +108,7 @@ package body Windows.Editor is (This : in out Editor_Window) return FLTK.Widgets.Menus.Menu_Reference is begin - return Ref : FLTK.Widgets.Menus.Menu_Reference (This.Popup'Access); + return Ref : FLTK.Widgets.Menus.Menu_Reference (This.Popup'Unchecked_Access); end Get_Rightclick_Menu; |