diff options
| author | Benjamin Otte <otte@redhat.com> | 2013-02-02 00:21:15 +0100 |
|---|---|---|
| committer | Benjamin Otte <otte@redhat.com> | 2013-02-02 01:42:45 +0100 |
| commit | 5607a2125fa712f99abf21901d704f1831d7cea4 (patch) | |
| tree | c7a0155fcd8dd3c3e88dbe7346a4deb6edc5b4d2 /demos | |
| parent | bc473257c7ded972075a2fff5190919828797102 (diff) | |
| download | gtk+-5607a2125fa712f99abf21901d704f1831d7cea4.tar.gz | |
gtk-demo: Fix geniclude.pl.in to not look for extra files
This was supposed to be fixed in
08667728190dcd7e19ddbbead4add714fab23364 but I fixed the generated
geninclude.pl. Oops.
Diffstat (limited to 'demos')
| -rwxr-xr-x | demos/gtk-demo/geninclude.pl.in | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/demos/gtk-demo/geninclude.pl.in b/demos/gtk-demo/geninclude.pl.in index 0848416068..e031731604 100755 --- a/demos/gtk-demo/geninclude.pl.in +++ b/demos/gtk-demo/geninclude.pl.in @@ -24,20 +24,13 @@ for $file (@ARGV) { open INFO_FILE, $file or die "Cannot open '$file'\n"; $title = <INFO_FILE>; $title =~ s@^\s*/\*\s*@@; - $extra = ""; - if ($title =~ /^(.*)::(.*)$/) { - $title = $1; - $extra = " $2"; - } $title =~ s@\s*$@@; - $extra =~ s@^\s*@@; - $extra =~ s@\s*$@@; close INFO_FILE; print "GtkWidget *do_$basename (GtkWidget *do_widget);\n"; - push @demos, {"name" => $basename, "title" => $title, "file" => "$file $extra", + push @demos, {"name" => $basename, "title" => $title, "file" => "$file", "func" => "do_$basename"}; } |