[Affelio-cvs 850] CVS update: affelio/lib/Affelio/Managing

Back to archive index

Tadashi Okoshi slash****@users*****
2005年 12月 10日 (土) 11:38:04 JST


Index: affelio/lib/Affelio/Managing/NewsAggregator.pm
diff -u affelio/lib/Affelio/Managing/NewsAggregator.pm:1.10 affelio/lib/Affelio/Managing/NewsAggregator.pm:1.11
--- affelio/lib/Affelio/Managing/NewsAggregator.pm:1.10	Sat Dec 10 11:22:52 2005
+++ affelio/lib/Affelio/Managing/NewsAggregator.pm	Sat Dec 10 11:38:04 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: NewsAggregator.pm,v 1.10 2005/12/10 02:22:52 slash5234 Exp $
+# $Id: NewsAggregator.pm,v 1.11 2005/12/10 02:38:04 slash5234 Exp $
 
 package Affelio::Managing::NewsAggregator;
 {
@@ -137,11 +137,27 @@
 			    xwsse_mesg => $xwsse_mesg);
 
 	}catch Error with{
-#	    my $e = shift;
-#	    throw Affelio::exception::CommunicationException($e);
+	    my $e = shift;
 	    return;
 	};
 
+	if(!defined($ret)){
+	    return;
+	}
+	if($ret eq ""){
+	    return;
+	}
+
+	if(!defined($ret->{flerror})){
+	    return;
+	}
+	if($ret->{flerror} != 0 ){
+	    return;
+	}
+	if( (!defined($ret->{message})) || ($ret->{message} eq "")){
+	    return;
+	}
+
 	#########################################################
 	#Analyze returned value
 	debug_print("NewsAggregator::get_one: ret=[$ret]");


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