--- db/prgsrc/updatedb.pl	2001/07/21 23:59:52	1.20
+++ db/prgsrc/updatedb.pl	2002/01/12 00:55:33	1.22
@@ -22,7 +22,7 @@ The database, user and password are hard
 
 Dmitry Rubinstein
 
-=head1 $Id: updatedb.pl,v 1.20 2001/07/21 23:59:52 boris Exp $
+=head1 $Id: updatedb.pl,v 1.22 2002/01/12 00:55:33 roma7 Exp $
 
 =cut
 
@@ -135,6 +135,7 @@ sub UpdateTournament {
 
 sub UpdateQuestion {
     my ($dbh, $QuestionId, $field, $value) = @_;
+    $value=~s/\s*$//;
     $dbh->do("UPDATE Questions SET $field=$value 
 		WHERE QuestionId=$QuestionId")
 	or die $dbh->errstr;
@@ -229,7 +230,8 @@ MAIN:
     #
     my %QuestionFields = ('Тип'=> 'Type', 'Вид'=> 'Type', 
 			  'Автор' => 'Authors', 'Рейтинг'=>'Rating', 
-			  'Источник' => 'Sources');
+			  'Источник' => 'Sources',
+			  'Тема' => 'Topic');
 			  
 		      
     my($source);