[Affelio-cvs 1224] CVS update: affelio/lib/Affelio/misc

Back to archive index

Tadashi Okoshi slash****@users*****
2006年 4月 15日 (土) 04:35:28 JST


Index: affelio/lib/Affelio/misc/InitAffelio.pm
diff -u affelio/lib/Affelio/misc/InitAffelio.pm:1.20 affelio/lib/Affelio/misc/InitAffelio.pm:1.21
--- affelio/lib/Affelio/misc/InitAffelio.pm:1.20	Tue Apr 11 15:12:52 2006
+++ affelio/lib/Affelio/misc/InitAffelio.pm	Sat Apr 15 04:35:28 2006
@@ -14,7 +14,7 @@
 # along with this program; if not, write to the Free Software
 # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 #
-# $Id: InitAffelio.pm,v 1.20 2006/04/11 06:12:52 slash5234 Exp $
+# $Id: InitAffelio.pm,v 1.21 2006/04/14 19:35:28 slash5234 Exp $
 
 package Affelio::misc::InitAffelio;
 {
@@ -402,6 +402,24 @@
 	} 
 
 	################################
+	#accesslog
+	################################
+	$create_tbl_cmd = <<EOT;
+CREATE TABLE $af->{site__dbtbl_prefix}_CORE_accesslog(id INTEGER PRIMARY KEY, 
+				   id2 INTEGER, 
+				   timestamp BIGINT, 
+				   nickname TEXT, 
+				   afid TEXT, 
+				   type TEXT)
+EOT
+        if($af->{site__db_type} eq "mysql"){
+	    $create_tbl_cmd =~ s/AUTOINCREMENT/AUTO\_INCREMENT/g;
+	}
+        if(!$dbh->do($create_tbl_cmd)){
+	    throw  Affelio::exception::DBException("creating accesslog tbl: $@");
+	} 
+
+	################################
 	#disconnect DB
 	################################
 	try{				    


Affelio-cvs メーリングリストの案内
Back to archive index