From ba1719013e5bab82a2accb4aadfd8451c3ebc931 Mon Sep 17 00:00:00 2001
From: Jedidiah Barber <contact@jedbarber.id.au>
Date: Thu, 16 Jan 2025 12:17:46 +1300
Subject: Fixed bug in Fl_Choice binding, filled small hole in Fl_Menu_Button
 binding

---
 doc/fl_choice.html      | 31 ++++++++++++++++---------------
 doc/fl_menu_button.html | 13 +++++++++++--
 2 files changed, 27 insertions(+), 17 deletions(-)

(limited to 'doc')

diff --git a/doc/fl_choice.html b/doc/fl_choice.html
index 9f83a30..777cece 100644
--- a/doc/fl_choice.html
+++ b/doc/fl_choice.html
@@ -79,15 +79,6 @@ function Handle
 </pre></td>
   </tr>
 
-  <tr>
-<td>Get the index into the Fl_Menu_Item array and do a manual lookup.</td>
-<td><pre>
-function Get_Chosen
-       (This : in Choice)
-    return FLTK.Menu_Items.Menu_Item_Reference;
-</pre></td>
-  </tr>
-
   <tr>
 <td><pre>
 int value() const;
@@ -101,23 +92,33 @@ function Chosen_Index
 
   <tr>
 <td><pre>
-int value(int v);
+int value(const Fl_Menu_Item *v);
 </pre></td>
 <td><pre>
 procedure Set_Chosen
-       (This  : in out Choice;
-        Place : in     Index);
+       (This : in out Choice;
+        Item : in     FLTK.Menu_Items.Menu_Item);
+
+function Set_Chosen
+       (This : in out Choice;
+        Item : in     FLTK.Menu_Items.Menu_Item)
+    return Boolean;
 </pre></td>
   </tr>
 
   <tr>
 <td><pre>
-int value(const Fl_Menu_Item *v);
+int value(int v);
 </pre></td>
 <td><pre>
 procedure Set_Chosen
-       (This : in out Choice;
-        Item : in     FLTK.Menu_Items.Menu_Item);
+       (This  : in out Choice;
+        Place : in     Index);
+
+function Set_Chosen
+       (This  : in out Choice;
+        Place : in     Index)
+    return Boolean;
 </pre></td>
   </tr>
 
diff --git a/doc/fl_menu_button.html b/doc/fl_menu_button.html
index e0fbeaa..f264774 100644
--- a/doc/fl_menu_button.html
+++ b/doc/fl_menu_button.html
@@ -96,11 +96,20 @@ function Popup
   </tr>
 
   <tr>
-<td>Use the type method in Fl_Widget with the popup_buttons enum.</td>
+<td>Use the type methods in Fl_Widget with the popup_buttons enum.</td>
+<td><pre>
+function Get_Popup_Kind
+       (This : in Menu_Button)
+    return Popup_Buttons;
+</pre></td>
+  </tr>
+
+  <tr>
+<td>Use the type methods in Fl_Widget with the popup_buttons enum.</td>
 <td><pre>
 procedure Set_Popup_Kind
        (This : in out Menu_Button;
-        Pop  : in     Popup_Buttons);
+        Kind : in     Popup_Buttons);
 </pre></td>
   </tr>
 
-- 
cgit