Refactored draw/handle methods in Widgets hierarchy, improved docs, added a few minor method bindings here and there

1 files changed, 39 insertions, 22 deletions

diff --git a/doc/fl_pack.html b/doc/fl_pack.html
index 0c05789..583ee08 100644
--- a/doc/fl_pack.html
+++ b/doc/fl_pack.html
@@ -43,7 +43,7 @@
 
   <tr>
     <td>enum { VERTICAL = 0, HORIZONTAL = 1 }</td>
-    <td>&nbsp;</td>
+    <td>Pack_Kind</td>
   </tr>
 
 </table>
@@ -51,7 +51,7 @@
 
 
 <table class="function">
-  <tr><th colspan="2">Functions and Procedures</th></tr>
+  <tr><th colspan="2">Constructors</th></tr>
 
   <tr>
 <td><pre>
@@ -60,36 +60,27 @@ Fl_Pack(int x, int y, int w, int h, const char *l=0);
 <td><pre>
 function Create
        (X, Y, W, H : in Integer;
-        Text       : in String)
+        Text       : in String := "")
     return Packed_Group;
 </pre></td>
   </tr>
 
-  <tr>
-<td><pre>
-void draw();
-</pre></td>
-<td><pre>
-procedure Draw
-       (This : in out Packed_Group);
-</pre></td>
-  </tr>
+</table>
+
 
-  <tr>
-<td>&nbsp;</td>
-<td><pre>
-function Handle
-       (This  : in out Packed_Group;
-        Event : in     Event_Kind)
-    return Event_Outcome;
-</pre></td>
-  </tr>
+
+<table class="function">
+  <tr><th colspan="2">Functions and Procedures</th></tr>
 
   <tr>
 <td><pre>
 uchar horizontal() const;
 </pre></td>
-<td>&nbsp;</td>
+<td><pre>
+function Get_Pack_Type
+       (This : in Packed_Group)
+    return Pack_Kind;
+</pre></td>
   </tr>
 
   <tr>
@@ -114,6 +105,32 @@ procedure Set_Spacing
 </pre></td>
   </tr>
 
+  <tr>
+<td>See type method for Fl_Widget.</td>
+<td><pre>
+procedure Set_Pack_Type
+       (This : in out Packed_Group;
+        Kind : in     Pack_Kind);
+</pre></td>
+  </tr>
+
+</table>
+
+
+
+<table class="function">
+  <tr><th colspan="2">Protected Functions and Procedures</th></tr>
+
+  <tr>
+<td><pre>
+void draw();
+</pre></td>
+<td><pre>
+procedure Draw
+       (This : in out Packed_Group);
+</pre></td>
+  </tr>
+
 </table>