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

Back to archive index

Tadashi Okoshi slash****@users*****
2005年 12月 10日 (土) 09:46:28 JST


Index: affelio/lib/Affelio.pm
diff -u affelio/lib/Affelio.pm:1.28 affelio/lib/Affelio.pm:1.29
--- affelio/lib/Affelio.pm:1.28	Sat Dec 10 08:56:09 2005
+++ affelio/lib/Affelio.pm	Sat Dec 10 09:46:28 2005
@@ -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: Affelio.pm,v 1.28 2005/12/09 23:56:09 slash5234 Exp $
+# $Id: Affelio.pm,v 1.29 2005/12/10 00:46:28 slash5234 Exp $
 
 package Affelio;
 {
@@ -33,6 +33,7 @@
     use Affelio::Managing::MessageManager;
     use Affelio::Managing::ApplicationManager;
     use Affelio::Managing::AccessLogManager;
+    use Affelio::Managing::NewsAggregator;
     use Affelio::misc::Debug;
     use Affelio::misc::L10N;
     use Affelio::misc::WebInput;
@@ -108,8 +109,10 @@
 	my $perm = "";
 	my $am = "";
 	my $alm = "";
+	my $nghr_news = "";
 	my $farm_con = "";
 
+
 	###################################
 	#Blessing
 	###################################
@@ -124,6 +127,7 @@
 		    perm => $perm,
 		    am => $am,
 		    alm => $alm,
+		    nghr_news => $nghr_news,
 		    mode => $mode,
 		    guest_owner_switch => $guest_owner_switch,
 		    caller => $caller,
@@ -348,6 +352,33 @@
     }
 
     ######################################################################
+    #getNghrNews
+    ######################################################################
+    sub getNghrNews{
+	my $self=shift;
+
+	if(! ($self->{nghr_news}) ){
+	    $self->load_NewsAggregator();
+	}
+	return($self->{nghr_news});
+    }
+
+    ######################################################################
+    #load_NewsAggregator
+    ######################################################################
+    sub load_NewsAggregator{
+	my $self = shift;
+	try{
+	    $self->{nghr_news} = new Affelio::Managing::NewsAggregator($self);
+	}catch Error with {
+	    my $ex = shift;
+	    if($self->{mode} ne "init"){
+		throw Affelio::exception::SystemException("Cannot load NewsAggregator: $ex");
+	    }
+	};
+    }
+
+    ######################################################################
     #getFM
     ######################################################################
     sub getFM{


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