From: Benjamin Otte Date: Fri, 1 Feb 2013 23:21:15 +0000 (+0100) Subject: gtk-demo: Fix geniclude.pl.in to not look for extra files X-Git-Url: http://pileus.org/git/?a=commitdiff_plain;h=5607a2125fa712f99abf21901d704f1831d7cea4;hp=bc473257c7ded972075a2fff5190919828797102;p=~andy%2Fgtk 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. --- diff --git a/demos/gtk-demo/geninclude.pl.in b/demos/gtk-demo/geninclude.pl.in index 084841606..e03173160 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 = ; $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"}; }