Tadashi Okoshi
slash****@users*****
2005年 6月 28日 (火) 23:07:21 JST
Index: affelio/setup.cgi diff -u affelio/setup.cgi:1.8 affelio/setup.cgi:1.9 --- affelio/setup.cgi:1.8 Fri Jun 24 13:37:52 2005 +++ affelio/setup.cgi Tue Jun 28 23:07:21 2005 @@ -6,7 +6,7 @@ # http://affelio.jp/ (Japan) # http://affelio.jp/ (USA and other area) # -# $Id: setup.cgi,v 1.8 2005/06/24 04:37:52 slash5234 Exp $ +# $Id: setup.cgi,v 1.9 2005/06/28 14:07:21 slash5234 Exp $ use strict; @@ -608,8 +608,9 @@ $create_tbl_cmd = <<EOT; CREATE TABLE AFuser_CORE_message(mid INTEGER PRIMARY KEY, timestamp TEXT, msgtitle TEXT, msgtype TEXT, msgfrom TEXT, msgbody TEXT, readflag INTEGER) EOT - my $sth = $af->{db}->prepare($create_tbl_cmd) or die $af->{db}->errstr; - $sth->execute or die $af->{db}->errstr; + if(!$dbh->do($create_tbl_cmd)){ + die $dbh->errstr; + } $dbh->disconnect;