From e5f4cdd01d2a4b3673d543cba7539d691244af3a Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Mon, 22 May 2017 20:58:53 +1000
Subject: Updated to work with updated FLTK Ada binding

---
 src/adapad.adb | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'src/adapad.adb')

diff --git a/src/adapad.adb b/src/adapad.adb
index 46c4258..2d4096d 100644
--- a/src/adapad.adb
+++ b/src/adapad.adb
@@ -4,7 +4,6 @@ with FLTK.Widgets.Menus;
 with FLTK.Widgets.Groups.Windows;
 with FLTK.Text_Buffers;
 with FLTK.Dialogs;
-with FLTK.Enums; use FLTK.Enums;
 with Windows.Editor;
 with Windows.About;
 with Windows.Find;
@@ -631,6 +630,7 @@ begin
 
     --  definitely need to work out a better tabular structure for this code block
     declare
+        use FLTK;
         use FLTK.Widgets.Menus;
         Bar : Menu_Cursor := Editor.Get_Menu_Bar;
     begin
@@ -668,6 +668,7 @@ begin
 
 
     declare
+        use FLTK;
         use FLTK.Widgets.Menus;
         Pop : Menu_Cursor := Editor.Get_Rightclick_Menu;
     begin
-- 
cgit