1 files changed, 10 insertions, 3 deletions
diff --git a/src/fltk-widgets-groups-text_displays-text_editors.ads b/src/fltk-widgets-groups-text_displays-text_editors.ads
index 4f9f183..b21cc3b 100644
--- a/src/fltk-widgets-groups-text_displays-text_editors.ads
+++ b/src/fltk-widgets-groups-text_displays-text_editors.ads
@@ -1,7 +1,9 @@
 
 
-private with Interfaces.C;
-private with Ada.Containers.Vectors;
+private with
+
+    Interfaces.C,
+    Ada.Containers.Vectors;
 
 
 package FLTK.Widgets.Groups.Text_Displays.Text_Editors is
@@ -327,17 +329,20 @@ private
            (Index_Type => Positive, Element_Type => Key_Binding);
 
 
+
+
     type Text_Editor is new Text_Display with
         record
             Bindings     : Binding_Vectors.Vector;
             Default_Func : Default_Key_Func;
         end record;
 
-
     overriding procedure Finalize
            (This : in out Text_Editor);
 
 
+
+
     function Key_Func_Hook
            (K : in Interfaces.C.int;
             E : in System.Address)
@@ -345,6 +350,8 @@ private
     pragma Convention (C, Key_Func_Hook);
 
 
+
+
     package Editor_Convert is new System.Address_To_Access_Conversions (Text_Editor'Class);