--- db/prgsrc/updatedb.pl 2000/11/11 03:58:59 1.18 +++ db/prgsrc/updatedb.pl 2000/11/11 04:05:52 1.19 @@ -22,7 +22,7 @@ The database, user and password are hard Dmitry Rubinstein -=head1 $Id: updatedb.pl,v 1.18 2000/11/11 03:58:59 boris Exp $ +=head1 $Id: updatedb.pl,v 1.19 2000/11/11 04:05:52 boris Exp $ =cut @@ -292,7 +292,8 @@ MAIN: if ($key =~ /Вопрос/) { if (!$TourId) { $qnum = 0; - $TourId=CreateTour($dbh,'1',$TournamentId, + $TourNum++; + $TourId=CreateTour($dbh,'1',$TournamentId,$TourNum, \%TourDefaults); %QuestionDefaults=%QuestionGlobalDefaults; }