Fixed HTTP-client query-string handling bug.

[doldaconnect.git] / common / makegdesc

diff --git a/common/makegdesc b/common/makegdesc
index e8fd6f5..b61ed75 100755 (executable)
--- a/common/makegdesc
+++ b/common/makegdesc
@@ -63,6 +63,16 @@ sub printwidgets
                print $widget->{"pad"} || "0";
                print ");\n";
            }
+       } elsif($widget->{"type"} =~ /([hv])btnbox/) {
+           print "${p}stack[$sl] = gtk_" . $1 . "button_box_new();\n";
+           if(defined($widget->{"layout"})) {
+               print "${p}gtk_button_box_set_layout(GTK_BUTTON_BOX(stack[$sl]), GTK_BUTTONBOX_" . $widget->{"layout"} . ");\n";
+           }
+           $pf = sub
+           {
+               my($widget, $p, $sl) = @_;
+               print "${p}gtk_container_add(GTK_CONTAINER(stack[" . ($sl - 1) . "]), stack[$sl]);\n";
+           }
        } elsif($widget->{"type"} eq "table") {
            print "${p}stack[$sl] = gtk_table_new(" . $widget->{"rows"} . ", " . $widget->{"cols"};
            print ", " . (($widget->{"homo"} eq "TRUE")?"TRUE":"FALSE");
@@ -321,6 +331,16 @@ sub printwidgets
                print "${p}gtk_tree_view_column_set_cell_data_func(column, renderer, " . $widget->{"func"} . ", " . ($widget->{"funcdata"} || "NULL") . ", NULL);\n";
            }
            $widget->{"noshow"} = 1;
+       } elsif($widget->{"type"} eq "progrend") {
+           print "${p}renderer = gtk_cell_renderer_progress_new();\n";
+           print "${p}gtk_tree_view_column_pack_start(column, renderer, " . (defined($widget->{"expand"})?$widget->{"expand"}:"FALSE") . ");\n";
+           if(defined($widget->{"value"})) {
+               print "${p}gtk_tree_view_column_add_attribute(column, renderer, \"value\", " . $widget->{"value"} . ");\n";
+           }
+           if(defined($widget->{"func"})) {
+               print "${p}gtk_tree_view_column_set_cell_data_func(column, renderer, " . $widget->{"func"} . ", " . ($widget->{"funcdata"} || "NULL") . ", NULL);\n";
+           }
+           $widget->{"noshow"} = 1;
        } elsif($widget->{"type"} eq "custrend") {
            print "${p}renderer = GTK_CELL_RENDERER(" . $widget->{"newfunc"} . "());\n";
            print "${p}gtk_tree_view_column_pack_start(column, renderer, " . (defined($widget->{"expand"})?$widget->{"expand"}:"FALSE") . ");\n";