gtk-demo: Fix geniclude.pl.in to not look for extra files
This was supposed to be fixed in
0866772819 but I fixed the generated
geninclude.pl. Oops.
			
			
This commit is contained 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"}; | ||||
| } | ||||
|  | ||||
|  | ||||
		Reference in New Issue
	
	Block a user
	 Benjamin Otte
					Benjamin Otte