1 files changed, 36 insertions, 0 deletions
diff --git a/spec/fltk-widgets-groups-text_displays.ads b/spec/fltk-widgets-groups-text_displays.ads
index 7892277..c057ce0 100644
--- a/spec/fltk-widgets-groups-text_displays.ads
+++ b/spec/fltk-widgets-groups-text_displays.ads
@@ -115,6 +115,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Buffers  --
+
     function Get_Buffer
            (This : in Text_Display)
         return FLTK.Text_Buffers.Text_Buffer_Reference;
@@ -138,6 +140,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Highlighting  --
+
     procedure Highlight_Data
            (This  : in out Text_Display;
             Buff  : in out FLTK.Text_Buffers.Text_Buffer;
@@ -160,6 +164,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Measurement Conversion  --
+
     function Col_To_X
            (This    : in Text_Display;
             Col_Num : in Integer)
@@ -234,6 +240,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Cursors  --
+
     function Get_Cursor_Color
            (This : in Text_Display)
         return Color;
@@ -255,6 +263,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Text Settings  --
+
     function Get_Text_Color
            (This : in Text_Display)
         return Color;
@@ -282,6 +292,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Text Insert  --
+
     procedure Insert_Text
            (This : in out Text_Display;
             Item : in     String);
@@ -304,6 +316,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Words  --
+
     function Word_Start
            (This : in out Text_Display;
             Pos  : in     Natural)
@@ -323,6 +337,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Wrapping  --
+
     procedure Set_Wrap_Mode
            (This   : in out Text_Display;
             Mode   : in     Wrap_Mode;
@@ -358,6 +374,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Lines  --
+
     --  Takes into account word wrap
     function Line_Start
            (This : in Text_Display;
@@ -404,6 +422,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Absolute Lines  --
+
     procedure Redo_Absolute_Top_Line
            (This      : in out Text_Display;
             Old_First : in     Natural);
@@ -426,6 +446,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Visible Lines  --
+
     function Has_Empty_Visible_Lines
            (This : in Text_Display)
         return Boolean;
@@ -442,6 +464,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Line Numbers  --
+
     function Get_Linenumber_Alignment
            (This : in Text_Display)
         return Alignment;
@@ -501,6 +525,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Text Measurement  --
+
     function Measure_Character
            (This  : in Text_Display;
             Text  : in String;
@@ -522,6 +548,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Movement  --
+
     procedure Move_Down
            (This : in out Text_Display);
 
@@ -553,6 +581,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Scrolling  --
+
     procedure Scroll_To
            (This   : in out Text_Display;
             Line   : in     Natural;
@@ -589,6 +619,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Shortcuts  --
+
     function Get_Shortcut
            (This : in Text_Display)
         return Key_Combo;
@@ -600,6 +632,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Dimensions  --
+
     procedure Resize
            (This       : in out Text_Display;
             X, Y, W, H : in     Integer);
@@ -607,6 +641,8 @@ package FLTK.Widgets.Groups.Text_Displays is
 
 
 
+    --  Drawing, Events  --
+
     procedure Clear_Rect
            (This       : in out Text_Display;
             Style      : in     Styles.Style_Info;