Accept dashes in demo titles.

2005-07-12  Matthias Clasen  <mclasen@redhat.com>

	* demos/gtk-demo/geninclude.pl.in: Accept dashes in demo titles.
This commit is contained in:
Matthias Clasen 2005-07-12 15:28:45 +00:00 committed by Matthias Clasen
parent 44eb8d265a
commit d3f9744fdd
4 changed files with 14 additions and 2 deletions

View File

@ -1,3 +1,7 @@
2005-07-12 Matthias Clasen <mclasen@redhat.com>
* demos/gtk-demo/geninclude.pl.in: Accept dashes in demo titles.
2005-07-12 Matthias Clasen <mclasen@redhat.com>
* gtk/theme-bits/decompose-bits.c:

View File

@ -1,3 +1,7 @@
2005-07-12 Matthias Clasen <mclasen@redhat.com>
* demos/gtk-demo/geninclude.pl.in: Accept dashes in demo titles.
2005-07-12 Matthias Clasen <mclasen@redhat.com>
* gtk/theme-bits/decompose-bits.c:

View File

@ -1,3 +1,7 @@
2005-07-12 Matthias Clasen <mclasen@redhat.com>
* demos/gtk-demo/geninclude.pl.in: Accept dashes in demo titles.
2005-07-12 Matthias Clasen <mclasen@redhat.com>
* gtk/theme-bits/decompose-bits.c:

View File

@ -35,7 +35,7 @@ for $file (@ARGV) {
# generate a list of 'parent names'
foreach $href (@demos) {
if ($href->{"title"} =~ m|^([\w\s]+)/[\w\s]+$|) {
if ($href->{"title"} =~ m|^([-\w\s]+)/[-\w\s]+$|) {
my $parent_name = $1;
my $do_next = 0;
@ -77,7 +77,7 @@ if (defined @parents) {
next;
}
if ($demos[$j]{"title"} =~ m|^$parents[$i]/([\w\s]+)$|) {
if ($demos[$j]{"title"} =~ m|^$parents[$i]/([-\w\s]+)$|) {
if ($first) {
$first = 0;
} else {