Add wrap attribute for labels.

[doldaconnect.git] / common / makegdesc

diff --git a/common/makegdesc b/common/makegdesc
index 99a8314..cf91c40 100755 (executable)
--- a/common/makegdesc
+++ b/common/makegdesc
@@ -117,6 +117,9 @@ sub printwidgets
        } elsif($widget->{"type"} eq "lbl") {
            $widget->{"label"} || die("Can't have label without label\n");
            print "${p}stack[$sl] = gtk_label_new(_(\"" . $widget->{"label"} . "\"));\n";
+           if($widget->{"wrap"} eq "y") {
+               print "${p}gtk_label_set_line_wrap(GTK_LABEL(stack[$sl]), TRUE);\n";
+           }
        } elsif($widget->{"type"} eq "mlbl") {
            $widget->{"label"} || die("Can't have label without label\n");
            print "${p}stack[$sl] = gtk_label_new_with_mnemonic(_(\"" . $widget->{"label"} . "\"));\n";
@@ -224,16 +227,19 @@ sub printwidgets
            } else {
                print "0.5";
            }
+           print ", ";
            if(defined($widget->{"ya"})) {
                print $widget->{"ya"};
            } else {
                print "0.5";
            }
+           print ", ";
            if(defined($widget->{"xs"})) {
                print $widget->{"xs"};
            } else {
                print "1.0";
            }
+           print ", ";
            if(defined($widget->{"ys"})) {
                print $widget->{"ys"};
            } else {