[Affelio-cvs 265] CVS update: affelio/lib

Back to archive index

Tadashi Okoshi slash****@users*****
2005年 6月 29日 (水) 19:40:16 JST


Index: affelio/lib/Affelio.pm
diff -u affelio/lib/Affelio.pm:1.10 affelio/lib/Affelio.pm:1.11
--- affelio/lib/Affelio.pm:1.10	Tue Jun 28 18:48:54 2005
+++ affelio/lib/Affelio.pm	Wed Jun 29 19:40:16 2005
@@ -4,7 +4,7 @@
 #    http://affelio.jp/ (Japan)
 #    http://affelio.jp/ (USA and other area)
 #
-# $Id: Affelio.pm,v 1.10 2005/06/28 09:48:54 slash5234 Exp $
+# $Id: Affelio.pm,v 1.11 2005/06/29 10:40:16 slash5234 Exp $
 
 package Affelio;
 {
@@ -22,6 +22,7 @@
     use Affelio::Managing::PermissionManager;
     use Affelio::Managing::MessageManager;
     use Affelio::Managing::ApplicationManager;
+    use Affelio::Managing::AccessLogManager;
     use Affelio::misc::Debug;
     use Affelio::misc::L10N;
     use Affelio::misc::WebInput;
@@ -90,6 +91,7 @@
 	my $gm = "";
 	my $perm = "";
 	my $am = "";
+	my $alm = "";
 
 	###################################
 	#Blessing
@@ -103,6 +105,7 @@
 		    gm => $gm,
 		    perm => $perm,
 		    am => $am,
+		    alm => $alm,
 		    mode => $mode,
 		    guest_owner_switch => $guest_owner_switch,
 		    caller => $caller
@@ -138,6 +141,9 @@
 	#Load permission manager
 	$self->load_MessageManager();
 
+	#Load permission manager
+	$self->load_AccessLogManager();
+
 	if($self->{mode} ne "init"){
 	    $self->load_ApplicationManager();
 	}
@@ -330,6 +336,23 @@
     }
 
     ######################################################################
+    #load_AccessLogManager
+    ######################################################################
+    sub load_AccessLogManager{
+	my $self = shift;
+	try{
+	    $self->{alm} = new Affelio::Managing::AccessLogManager($self);
+	}
+	catch Error with {
+	    my $ex = shift;
+	    if($self->{mode} ne "init"){
+		die "Cannot load accesslog manager";
+	    }
+	};
+
+    }
+
+    ######################################################################
     #load_ApplicationManager
     ######################################################################
     sub load_ApplicationManager{


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