From dda92d3223611c1ce22597c5839e67ecf0dff5ae Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Wed, 31 May 2017 17:32:08 +1000
Subject: Completed Double_Window, Single_Window, Menu_Window widgets

---
 src/fltk-widgets-groups-windows-single.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/fltk-widgets-groups-windows-single.adb')

diff --git a/src/fltk-widgets-groups-windows-single.adb b/src/fltk-widgets-groups-windows-single.adb
index 0416983..284e506 100644
--- a/src/fltk-widgets-groups-windows-single.adb
+++ b/src/fltk-widgets-groups-windows-single.adb
@@ -114,7 +114,7 @@ package body FLTK.Widgets.Groups.Windows.Single is
 
 
     procedure Show
-           (This : in Single_Window) is
+           (This : in out Single_Window) is
     begin
         fl_single_window_show (This.Void_Ptr);
     end Show;
-- 
cgit