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.3, 2010/04/24 21:52:16
Line 65 $surname{'error'}='Глюков';	Line 65 $surname{'error'}='Глюков';
$name{'error'}='Очепят';	$name{'error'}='Очепят';
$surname{'unknown'}='Неизвестный';	$surname{'unknown'}='Неизвестный';
$name{'unknown'}='Псевдоним';	$name{'unknown'}='Псевдоним';
$surname{'team'}='Капитанова';	$surname{'team'}='Авторов';
$name{'team'}='Команда_';	$name{'team'}='Коллектив';


while (<SSNICKS>)	while (<SSNICKS>)
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} = '';
}	}
}	}