Tabs: Changing the tab button label

1 files changed, 18 insertions, 0 deletions

diff --git a/src/ui/util.c b/src/ui/util.c
index 8a174393..a68d340d 100644
--- a/src/ui/util.c
+++ b/src/ui/util.c
@@ -340,6 +340,18 @@ iWidget *removeTabPage_Widget(iWidget *tabs, size_t index) {
     return page;
 }
 
+iLabelWidget *tabButtonForPage_Widget_(iWidget *tabs, const iWidget *page) {
+    iWidget *buttons = findChild_Widget(tabs, "tabs.buttons");
+    iForEach(ObjectList, i, buttons->children) {
+        iAssert(isInstance_Object(i.object, &Class_LabelWidget));
+        iAny *label = i.object;
+        if (pointerLabel_Command(cstr_String(command_LabelWidget(label)), "page") == page) {
+            return label;
+        }
+    }
+    return NULL;
+}
+
 void showTabPage_Widget(iWidget *tabs, const iWidget *page) {
     /* Select the corresponding button. */ {
         iWidget *buttons = findChild_Widget(tabs, "tabs.buttons");
@@ -364,6 +376,12 @@ void showTabPage_Widget(iWidget *tabs, const iWidget *page) {
     }
 }
 
+void setTabPageLabel_Widget(iWidget *tabs, const iAnyObject *page, const iString *label) {
+    iLabelWidget *button = tabButtonForPage_Widget_(tabs, page);
+    setText_LabelWidget(button, label);
+    arrange_Widget(tabs);
+}
+
 const iWidget *currentTabPage_Widget(const iWidget *tabs) {
     iWidget *pages = findChild_Widget(tabs, "tabs.pages");
     iConstForEach(ObjectList, i, pages->children) {