Slightly better / more consistent comments

1 files changed, 10 insertions, 0 deletions

diff --git a/spec/fltk-widgets-groups-help_views.ads b/spec/fltk-widgets-groups-help_views.ads
index 8cab6a7..d1dc75b 100644
--- a/spec/fltk-widgets-groups-help_views.ads
+++ b/spec/fltk-widgets-groups-help_views.ads
@@ -53,6 +53,8 @@ package FLTK.Widgets.Groups.Help_Views is
 
 
 
+    --  Selection  --
+
     procedure Clear_Selection
            (This : in out Help_View);
 
@@ -62,6 +64,8 @@ package FLTK.Widgets.Groups.Help_Views is
 
 
 
+    --  Position  --
+
     function Find
            (This : in Help_View;
             Item : in String;
@@ -91,6 +95,8 @@ package FLTK.Widgets.Groups.Help_Views is
 
 
 
+    --  Content  --
+
     function Current_Directory
            (This : in Help_View)
         return String;
@@ -123,6 +129,8 @@ package FLTK.Widgets.Groups.Help_Views is
 
 
 
+    --  Settings  --
+
     function Get_Scrollbar_Size
            (This : in Help_View)
         return Natural;
@@ -170,6 +178,8 @@ package FLTK.Widgets.Groups.Help_Views is
 
 
 
+    --  Drawing, Events  --
+
     procedure Draw
            (This : in out Help_View);