From: fredrik <fredrik@959494ce-11ee-0310-bf91-de5d638817bd>
Date: Mon, 16 Apr 2007 13:19:11 +0000 (+0000)
Subject: Add title attribute to assistant.
X-Git-Tag: 0.4~121
X-Git-Url: http://dolda2000.com/gitweb/?p=doldaconnect.git;a=commitdiff_plain;h=4b4f9fc7866b3cd64a334b64744c9c33a989d39a

Add title attribute to assistant.


git-svn-id: svn+ssh://svn.dolda2000.com/srv/svn/repos/src/doldaconnect@945 959494ce-11ee-0310-bf91-de5d638817bd
---

diff --git a/common/makegdesc b/common/makegdesc
index 4fd4f46..74f5b95 100755
--- a/common/makegdesc
+++ b/common/makegdesc
@@ -27,6 +27,9 @@ sub printwidgets
 	    }
 	} elsif($widget->{"type"} eq "assistant") {
 	    print "${p}stack[$sl] = gtk_assistant_new();\n";
+	    if(defined($widget->{"title"})) {
+		print "${p}gtk_window_set_title(GTK_WINDOW(stack[$sl]), \"" . $widget->{"title"} . "\");\n";
+	    }
 	    $pf = sub
 	    {
 		my($widget, $p, $sl) = @_;