X-Git-Url: http://git.dolda2000.com/gitweb/?a=blobdiff_plain;f=common%2Fmakegdesc;h=3e34b890930c3b56d25f4492ba16ba7bb2a409ea;hb=b4dd356ad938ecd081fd0826d60c7ea8c7d2d93a;hp=5ffcf09243ca3726ea53a4bf96ebed5d664ff31f;hpb=bf9a1919dcda8d86b95a294e9a609587339848e4;p=doldaconnect.git

diff --git a/common/makegdesc b/common/makegdesc
index 5ffcf09..3e34b89 100755
--- a/common/makegdesc
+++ b/common/makegdesc
@@ -197,6 +197,9 @@ sub printwidgets
 	    }
 	} elsif($widget->{"type"} eq "notebook") {
 	    print "${p}stack[$sl] = gtk_notebook_new();\n";
+	    if(defined($widget->{"pos"})) {
+		print "${p}gtk_notebook_set_tab_pos(GTK_NOTEBOOK(stack[$sl]), GTK_POS_" . $widget->{"pos"} . ");\n";
+	    }
 	    $pf = sub
 	    {
 		my($widget, $p, $sl) = @_;