From 1c0ddbf9eeb33f6bedc1fb9156e124b3a7b17bbc Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Sat, 13 May 2017 12:35:40 +1000
Subject: Handle method added for Boxes, Buttons, Widgets

---
 src/fltk-widgets-buttons.ads | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'src/fltk-widgets-buttons.ads')

diff --git a/src/fltk-widgets-buttons.ads b/src/fltk-widgets-buttons.ads
index f21fed4..981c313 100644
--- a/src/fltk-widgets-buttons.ads
+++ b/src/fltk-widgets-buttons.ads
@@ -33,6 +33,12 @@ package FLTK.Widgets.Buttons is
            (This : in out Button);
 
 
+    function Handle
+           (This  : in out Button;
+            Event : in     Event_Kind)
+        return Event_Outcome;
+
+
 private
 
 
-- 
cgit