--- db/prgsrc/updatedb.pl 2000/10/17 01:50:39 1.1 +++ db/prgsrc/updatedb.pl 2000/10/17 01:54:16 1.2 @@ -22,7 +22,7 @@ The database, user and password are hard Dmitry Rubinstein -=head1 $Id: updatedb.pl,v 1.1 2000/10/17 01:50:39 boris Exp $ +=head1 $Id: updatedb.pl,v 1.2 2000/10/17 01:54:16 boris Exp $ =cut @@ -162,7 +162,7 @@ MAIN: VALUES ($value, 'þ', $ParentId, $source, $CreatedAt)"); $sth->execute; - $TournamentId = $sth->{insertid}; + $TournamentId = $sth->{mysql_insertid}; next; } if ($key =~ /ôÕÒ/) { @@ -176,7 +176,7 @@ MAIN: (Title, Type, ParentId, CreatedAt) VALUES ($value, 'ô', $TournamentId, $CreatedAt)"); $sth->execute; - $TourId = $sth->{insertid}; + $TourId = $sth->{mysql_insertid}; next; } if ($key =~ /÷ÉÄ/) { @@ -188,7 +188,7 @@ MAIN: (ParentId, Number, Type) VALUES ($TourId, $qnum+1, $qtype)"); $sth->execute; - $QuestionId = $sth->{insertid}; + $QuestionId = $sth->{mysql_insertid}; &UpdateQuestion($dbh, $QuestionId, "Question", $value); $qnum++; $all_qnum++;