db/prgsrc/makeeditors.pl - diff

Return to makeeditors.pl CVS log

Up to [Local Repository] / db / prgsrc

version 1.1, 2010/04/24 17:21:53	version 1.2, 2010/04/24 18:28:36
Line 130 while (($TournamentId, $editor, $parent,	Line 130 while (($TournamentId, $editor, $parent,

foreach $t(keys %Tours) {	foreach $t(keys %Tours) {
%tour = %{$Tours{$t}};	%tour = %{$Tours{$t}};
print Dumper(\%tour);
if (	if (

(exists $tour{'children'}) &&	(exists $tour{'children'}) &&
Line 138 foreach $t(keys %Tours) {	Line 137 foreach $t(keys %Tours) {
) {	) {
$childrenSameAuthor = 1;	$childrenSameAuthor = 1;
foreach (@{$tour{children}}) {	foreach (@{$tour{children}}) {
print $Tours{$_} -> {editor}." ne ".$tour{editor}."\n";
if ($Tours{$_} -> {editor} ne $tour{editor}) {	if ($Tours{$_} -> {editor} ne $tour{editor}) {
$childrenSameAuthor = 0;	$childrenSameAuthor = 0;
} else {	} else {
print "!";
$Tours{$_} -> {editor} = '';	$Tours{$_} -> {editor} = '';
}	}
}	}