X-Git-Url: http://dolda2000.com/gitweb/?a=blobdiff_plain;f=common%2Fmakegdesc;h=443991fccbe355393cafa3aae40560d7cc053a34;hb=4e3cd270e70d2a32e3413b8983abe19af557d0b3;hp=bc4088c0972fab83c15baf69d365a163361c94b2;hpb=4854e96def0d86155f9a5bd1fd6f0403b0730d32;p=doldaconnect.git diff --git a/common/makegdesc b/common/makegdesc index bc4088c..443991f 100755 --- a/common/makegdesc +++ b/common/makegdesc @@ -25,6 +25,22 @@ sub printwidgets my($widget, $p, $sl) = @_; print "${p}gtk_container_add(GTK_CONTAINER(stack[" . ($sl - 1) . "]), stack[$sl]);\n"; } + } elsif($widget->{"type"} eq "assistant") { + print "${p}stack[$sl] = gtk_assistant_new();\n"; + $pf = sub + { + my($widget, $p, $sl) = @_; + print "${p}gtk_assistant_append_page(GTK_ASSISTANT(stack[" . ($sl - 1) . "]), stack[$sl]);\n"; + if(defined($widget->{"title"})) { + print "${p}gtk_assistant_set_page_title(GTK_ASSISTANT(stack[" . ($sl - 1) . "]), stack[" . $sl . "], _(\"" . $widget->{"title"} . "\"));\n"; + } + if(defined($widget->{"ptype"})) { + print "${p}gtk_assistant_set_page_type(GTK_ASSISTANT(stack[" . ($sl - 1) . "]), stack[" . $sl . "], GTK_ASSISTANT_PAGE_" . $widget->{"ptype"} . ");\n"; + } + if(defined($widget->{"cmpl"})) { + print "${p}gtk_assistant_set_page_complete(GTK_ASSISTANT(stack[" . ($sl - 1) . "]), stack[" . $sl . "], " . $widget->{"ptype"} . ");\n"; + } + } } elsif($widget->{"type"} =~ /[hv]box/) { print "${p}stack[$sl] = gtk_" . $widget->{"type"} . "_new("; print $widget->{"homo"}?"TRUE, ":"FALSE, ";