Removed superfluous use clauses, styling now more standardised

1 files changed, 26 insertions, 6 deletions

diff --git a/fltk-widgets.ads b/fltk-widgets.ads
index e692a65..7af5e2b 100644
--- a/fltk-widgets.ads
+++ b/fltk-widgets.ads
@@ -90,14 +90,34 @@ package FLTK.Widgets is
             Func : not null access Widget_Callback'Class);
 
 
-    function Get_X (This : in Widget) return Integer;
-    function Get_Y (This : in Widget) return Integer;
-    function Get_W (This : in Widget) return Integer;
-    function Get_H (This : in Widget) return Integer;
+    function Get_X
+           (This : in Widget)
+        return Integer;
+
+
+    function Get_Y
+           (This : in Widget)
+        return Integer;
+
+
+    function Get_W
+           (This : in Widget)
+        return Integer;
 
 
-    procedure Resize (This : in out Widget; W, H : in Integer);
-    procedure Reposition (This : in out Widget; X, Y : in Integer);
+    function Get_H
+           (This : in Widget)
+        return Integer;
+
+
+    procedure Resize
+           (This : in out Widget;
+            W, H : in     Integer);
+
+
+    procedure Reposition
+           (This : in out Widget;
+            X, Y : in     Integer);
 
 
     function Get_Image