--- db/prgsrc/makeeditors.pl	2010/04/24 17:21:53	1.1
+++ db/prgsrc/makeeditors.pl	2010/05/15 15:46:15	1.4
@@ -51,9 +51,10 @@ while (<NICKS>)
    ($number,$nick)=split;   
    next unless $number;   
    next unless $number=~/^\d+$/;
-   ($name,$surname)=split ' ',<NICKS>;
-   $name{$nick}= ucfirst lc $name;
-   $surname=ucfirst lc $surname;
+   @parts = split ' ',<NICKS>;
+   $_ = ucfirst lc $_ foreach  @parts;
+   $surname = pop @parts;
+   $name{$nick}= join ' ', @parts;
    $surname=~s/\-(.)/"-". uc $1/ge;
    $surname=~s/\'(.)/"'". uc $1/ge;
    $surname{$nick}= $surname;
@@ -65,8 +66,8 @@ $surname{'error'}='Глюков';
 $name{'error'}='Очепят';
 $surname{'unknown'}='Неизвестный';
 $name{'unknown'}='Псевдоним';
-$surname{'team'}='Капитанова';
-$name{'team'}='Команда_';
+$surname{'team'}='Авторов';
+$name{'team'}='Коллектив';
 
 
 while (<SSNICKS>)
@@ -130,7 +131,6 @@ while (($TournamentId, $editor, $parent,
 
 foreach $t(keys %Tours) {
   %tour = %{$Tours{$t}};
-  print Dumper(\%tour);
   if (
   
     (exists $tour{'children'}) && 
@@ -138,11 +138,9 @@ foreach $t(keys %Tours) {
   ) {
   $childrenSameAuthor = 1;
     foreach (@{$tour{children}}) {
-print $Tours{$_} -> {editor}." ne ".$tour{editor}."\n";
       if ($Tours{$_} -> {editor} ne $tour{editor}) {
         $childrenSameAuthor = 0;
       } else {
-      print "!";
         $Tours{$_} -> {editor} = '';
       }
     }